From: Stefan Monnier <monnier@iro.umontreal.ca>
Date: Tue, 15 Mar 2011 02:46:18 +0000 (-0400)
Subject: * lisp/allout.el (allout-abbreviate-flattened-numbering)
X-Git-Tag: emacs-pretest-24.0.90~104^2~275^2~574
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=c6eee9aa8d8a7dc5ec7469981a80d825554a5f6f;p=emacs.git

* lisp/allout.el (allout-abbreviate-flattened-numbering)
(allout-mode-deactivate-hook): Fix up obsolescence "date".
---

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 4bcb1117b1c..b62d061fe7b 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,5 +1,8 @@
 2011-03-15  Stefan Monnier  <monnier@iro.umontreal.ca>
 
+	* allout.el (allout-abbreviate-flattened-numbering)
+	(allout-mode-deactivate-hook): Fix up obsolescence "date".
+
 	* subr.el (read-char-choice): Only show the cursor after the prompt,
 	not after the answer.
 
diff --git a/lisp/allout.el b/lisp/allout.el
index 91eaa28fdaf..a12101ea9a5 100644
--- a/lisp/allout.el
+++ b/lisp/allout.el
@@ -310,6 +310,7 @@ Auto-layout is not.
 
 With value nil, inhibit any automatic allout-mode activation."
   :set 'allout-auto-activation-helper
+  ;; FIXME: Using strings here is unusual and less efficient than symbols.
   :type '(choice (const :tag "On" t)
                 (const :tag "Ask about layout" "ask")
                 (const :tag "Mode only" "activate")
@@ -752,7 +753,7 @@ Set this var to the bullet you want to use for file cross-references."
 
 ;;;_  = allout-flattened-numbering-abbreviation
 (define-obsolete-variable-alias 'allout-abbreviate-flattened-numbering
-  'allout-flattened-numbering-abbreviation "24.0")
+  'allout-flattened-numbering-abbreviation "24.1")
 (defcustom allout-flattened-numbering-abbreviation nil
   "If non-nil, `allout-flatten-exposed-to-buffer' abbreviates topic
 numbers to minimal amount with some context.  Otherwise, entire
@@ -1402,7 +1403,7 @@ their settings before allout-mode was started."
 (defvar allout-mode-deactivate-hook nil
   "*Hook that's run when allout mode ends.")
 (define-obsolete-variable-alias 'allout-mode-deactivate-hook
-  'allout-mode-off-hook "future")
+  'allout-mode-off-hook "24.1")
 ;;;_   = allout-exposure-category
 (defvar allout-exposure-category nil
   "Symbol for use as allout invisible-text overlay category.")