GNU bug report logs -
#15694
battery.el for Mac OS X Mavericks
Previous Next
Reported by: Masashi Fujimoto <masfj.dev <at> gmail.com>
Date: Wed, 23 Oct 2013 19:01:02 UTC
Severity: normal
Tags: patch
Fixed in version 24.4
Done: Glenn Morris <rgm <at> gnu.org>
Bug is archived. No further changes may be made.
Full log
View this message in rfc822 format
[Message part 1 (text/plain, inline)]
Your message dated Wed, 23 Oct 2013 15:45:14 -0400
with message-id <ue61snkbzp.fsf <at> fencepost.gnu.org>
and subject line Re: bug#15694: battery.el for Mac OS X Mavericks
has caused the debbugs.gnu.org bug report #15694,
regarding battery.el for Mac OS X Mavericks
to be marked as done.
(If you believe you have received this mail in error, please contact
help-debbugs <at> gnu.org.)
--
15694: http://debbugs.gnu.org/cgi/bugreport.cgi?bug=15694
GNU Bug Tracking System
Contact help-debbugs <at> gnu.org with problems
[Message part 2 (message/rfc822, inline)]
[Message part 3 (text/plain, inline)]
Because the return value of `pmset' on Mac OS X Mavericks changed, If you
evaluate (display-battery-mode 1), the following error occurs.
`wrong-type-argument number-or-marker-p N/A'.
I made a patch for this issue.
Thanks for reading.
--
Masashi Fujimoto
--- battery.el 2013-01-02 05:37:17.000000000 +0900
+++ mavericks-battery.el 2013-10-23 12:11:13.000000000 +0900
@@ -543,7 +543,7 @@ The following %-sequences are provided:
(with-temp-buffer
(ignore-errors (call-process "pmset" nil t nil "-g" "ps"))
(goto-char (point-min))
- (when (re-search-forward "Currentl?y drawing from
'\\(AC\\|Battery\\) Power'" nil t)
+ (when (re-search-forward "\\(Currentl?y\\|Now\\) drawing from
'\\(AC\\|Battery\\) Power'" nil t)
(setq power-source (match-string 1))
(when (re-search-forward "^ -InternalBattery-0[ \t]+" nil t)
(when (looking-at "\\([0-9]\\{1,3\\}\\)%")
[Message part 4 (text/html, inline)]
[Message part 5 (message/rfc822, inline)]
Version: 24.4
Applied with a tweak (shy group).
*** lisp/battery.el 2013-03-05 17:13:01 +0000
--- lisp/battery.el 2013-10-23 19:41:17 +0000
***************
*** 615,621 ****
(with-temp-buffer
(ignore-errors (call-process "pmset" nil t nil "-g" "ps"))
(goto-char (point-min))
! (when (re-search-forward "Currentl?y drawing from '\\(AC\\|Battery\\) Power'" nil t)
(setq power-source (match-string 1))
(when (re-search-forward "^ -InternalBattery-0[ \t]+" nil t)
(when (looking-at "\\([0-9]\\{1,3\\}\\)%")
--- 615,621 ----
(with-temp-buffer
(ignore-errors (call-process "pmset" nil t nil "-g" "ps"))
(goto-char (point-min))
! (when (re-search-forward "\\(?:Currentl?y\\|Now\\) drawing from '\\(AC\\|Battery\\) Power'" nil t)
(setq power-source (match-string 1))
(when (re-search-forward "^ -InternalBattery-0[ \t]+" nil t)
(when (looking-at "\\([0-9]\\{1,3\\}\\)%")
This bug report was last modified 11 years and 209 days ago.
Previous Next
GNU bug tracking system
Copyright (C) 1999 Darren O. Benham,
1997,2003 nCipher Corporation Ltd,
1994-97 Ian Jackson.