[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] /srv/bzr/emacs/trunk r110935: Silence some warnings.
From: |
Juanma Barranquero |
Subject: |
[Emacs-diffs] /srv/bzr/emacs/trunk r110935: Silence some warnings. |
Date: |
Sun, 18 Nov 2012 02:20:04 +0100 |
User-agent: |
Bazaar (2.5.0) |
------------------------------------------------------------
revno: 110935
committer: Juanma Barranquero <address@hidden>
branch nick: trunk
timestamp: Sun 2012-11-18 02:20:04 +0100
message:
Silence some warnings.
lisp/woman.el (woman-non-underline-faces): Use `set-face-underline'.
lisp/calc/calc.el (math-format-date-cache): Declare.
modified:
lisp/ChangeLog
lisp/calc/calc.el
lisp/woman.el
=== modified file 'lisp/ChangeLog'
--- a/lisp/ChangeLog 2012-11-17 22:01:59 +0000
+++ b/lisp/ChangeLog 2012-11-18 01:20:04 +0000
@@ -1,3 +1,8 @@
+2012-11-18 Juanma Barranquero <address@hidden>
+
+ * woman.el (woman-non-underline-faces): Use `set-face-underline'.
+ * calc/calc.el (math-format-date-cache): Declare.
+
2012-11-17 Paul Eggert <address@hidden>
* calc/calc-forms.el (math-julian-date-beginning)
=== modified file 'lisp/calc/calc.el'
--- a/lisp/calc/calc.el 2012-11-17 21:30:43 +0000
+++ b/lisp/calc/calc.el 2012-11-18 01:20:04 +0000
@@ -464,7 +464,9 @@
:type 'string
:group 'calc)
-;; Dates that are built-in options for `calc-gregorian-switch' should be
+(defvar math-format-date-cache) ; calc-forms.el
+
+;; Dates that are built-in options for `calc-gregorian-switch' should be
;; (YEAR MONTH DAY math-date-from-gregorian-dt(YEAR MONTH DAY)) for speed.
(defcustom calc-gregorian-switch nil
"The first day the Gregorian calendar is used by Calc's date forms.
@@ -500,8 +502,8 @@
(const :tag "Sweden (1753 3 1)" (1753 3 1 639965))
(const :tag "Switzerland (Catholic) (1584 1 22)" (1584 1 22
578200))
(const :tag "Switzerland (Protestant) (1701 1 12)" (1701 1 12
620924))
- (list :tag "(YEAR MONTH DAY)"
- (integer :tag "Year")
+ (list :tag "(YEAR MONTH DAY)"
+ (integer :tag "Year")
(integer :tag "Month (integer)")
(integer :tag "Day")))
:set (lambda (symbol value)
=== modified file 'lisp/woman.el'
--- a/lisp/woman.el 2012-11-17 21:52:12 +0000
+++ b/lisp/woman.el 2012-11-18 01:20:04 +0000
@@ -2196,7 +2196,7 @@
(face-underline-p face))
(let ((face-no-ul (intern (concat face-name "-no-ul"))))
(copy-face face face-no-ul)
- (set-face-underline-p face-no-ul nil)))))))
+ (set-face-underline face-no-ul nil)))))))
;; Preprocessors
;; =============
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Emacs-diffs] /srv/bzr/emacs/trunk r110935: Silence some warnings.,
Juanma Barranquero <=