[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] /srv/bzr/emacs/trunk r101436: Explicitly pass `obarray' to
From: |
Juanma Barranquero |
Subject: |
[Emacs-diffs] /srv/bzr/emacs/trunk r101436: Explicitly pass `obarray' to `unintern' to avoid a warning. |
Date: |
Tue, 14 Sep 2010 16:59:42 +0200 |
User-agent: |
Bazaar (2.0.3) |
------------------------------------------------------------
revno: 101436
committer: Juanma Barranquero <address@hidden>
branch nick: trunk
timestamp: Tue 2010-09-14 16:59:42 +0200
message:
Explicitly pass `obarray' to `unintern' to avoid a warning.
* gnus/gnus-registry.el (gnus-registry-install-shortcuts)
* obsolete/old-whitespace.el (whitespace-unload-function)
modified:
lisp/ChangeLog
lisp/gnus/ChangeLog
lisp/gnus/gnus-registry.el
lisp/obsolete/old-whitespace.el
=== modified file 'lisp/ChangeLog'
--- a/lisp/ChangeLog 2010-09-14 14:41:53 +0000
+++ b/lisp/ChangeLog 2010-09-14 14:59:42 +0000
@@ -1,3 +1,8 @@
+2010-09-14 Juanma Barranquero <address@hidden>
+
+ * obsolete/old-whitespace.el (whitespace-unload-function):
+ Explicitly pass `obarray' to `unintern' to avoid a warning.
+
2010-09-14 Stefan Monnier <address@hidden>
* emacs-lisp/byte-run.el (set-advertised-calling-convention):
=== modified file 'lisp/gnus/ChangeLog'
--- a/lisp/gnus/ChangeLog 2010-09-14 13:44:44 +0000
+++ b/lisp/gnus/ChangeLog 2010-09-14 14:59:42 +0000
@@ -1,3 +1,8 @@
+2010-09-14 Juanma Barranquero <address@hidden>
+
+ * gnus-registry.el (gnus-registry-install-shortcuts):
+ Explicitly pass `obarray' to `unintern' to avoid a warning.
+
2010-09-14 Lars Magne Ingebrigtsen <address@hidden>
* gnus-start.el (gnus-read-active-for-groups): Reverted the previous
=== modified file 'lisp/gnus/gnus-registry.el'
--- a/lisp/gnus/gnus-registry.el 2010-09-02 01:42:32 +0000
+++ b/lisp/gnus/gnus-registry.el 2010-09-14 14:59:42 +0000
@@ -783,7 +783,7 @@
(function-name (format function-format variant-name))
(shortcut (format "%c" data))
(shortcut (if remove (upcase shortcut) shortcut)))
- (unintern function-name)
+ (unintern function-name obarray)
(eval
`(defun
;; function name
=== modified file 'lisp/obsolete/old-whitespace.el'
--- a/lisp/obsolete/old-whitespace.el 2010-01-13 08:35:10 +0000
+++ b/lisp/obsolete/old-whitespace.el 2010-09-14 14:59:42 +0000
@@ -788,7 +788,7 @@
(defun whitespace-unload-function ()
"Unload the whitespace library."
- (if (unintern "whitespace-unload-hook")
+ (if (unintern "whitespace-unload-hook" obarray)
;; if whitespace-unload-hook is defined, let's get rid of it
;; and recursively call `unload-feature'
(progn (unload-feature 'whitespace) t)
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Emacs-diffs] /srv/bzr/emacs/trunk r101436: Explicitly pass `obarray' to `unintern' to avoid a warning.,
Juanma Barranquero <=