aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorKen Manheimer2011-02-16 16:29:32 -0500
committerKen Manheimer2011-02-16 16:29:32 -0500
commit96497653538b909d541ece0707448b08ea99ee2f (patch)
treebd2b68a991ac1e56fa664605d8e4828b4b4d47f1
parentbe4a1d714e48267dfaac06e99184040242880754 (diff)
downloademacs-96497653538b909d541ece0707448b08ea99ee2f.tar.gz
emacs-96497653538b909d541ece0707448b08ea99ee2f.zip
Include PGP and GnuPG in Keywords, and other commentary refinements.
(allout-abbreviate-flattened-numbering): Rename to allout-flattened-numbering-abbreviation, and define-obsolete-variable-alias the old name. (allout-flattened-numbering-abbreviation): Rename from allout-abbreviate-flattened-numbering. (allout-mode-p): Include among autoloads, for use by other modes with impunity. (allout-listify-exposed): Use allout-flattened-numbering-abbreviation. (allout-encrypt-string): Use set-buffer-multibyte directly. (allout-set-buffer-multibyte): Remove.
-rw-r--r--lisp/ChangeLog16
-rw-r--r--lisp/allout.el35
2 files changed, 31 insertions, 20 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 3b8354c9b0f..b6cbc91fb37 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,19 @@
12011-02-16 Ken Manheimer <ken.manheimer@gmail.com>
2
3 * allout.el: Include PGP and GnuPG in Keywords, and other
4 commentary refinements.
5 (allout-abbreviate-flattened-numbering): Rename to
6 allout-flattened-numbering-abbreviation, and
7 define-obsolete-variable-alias the old name.
8 (allout-flattened-numbering-abbreviation): Rename from
9 allout-abbreviate-flattened-numbering.
10 (allout-mode-p): Include among autoloads, for use by other modes
11 with impunity.
12 (allout-listify-exposed): Use
13 allout-flattened-numbering-abbreviation.
14 (allout-encrypt-string): Use set-buffer-multibyte directly.
15 (allout-set-buffer-multibyte): Remove.
16
12011-02-16 Deniz Dogan <deniz.a.m.dogan@gmail.com> 172011-02-16 Deniz Dogan <deniz.a.m.dogan@gmail.com>
2 18
3 * simple.el (just-one-space): Remove useless `or' call. 19 * simple.el (just-one-space): Remove useless `or' call.
diff --git a/lisp/allout.el b/lisp/allout.el
index 5d87415a57f..f77fb0b47bd 100644
--- a/lisp/allout.el
+++ b/lisp/allout.el
@@ -6,7 +6,7 @@
6;; Maintainer: Ken Manheimer <ken dot manheimer at gmail dot com> 6;; Maintainer: Ken Manheimer <ken dot manheimer at gmail dot com>
7;; Created: Dec 1991 -- first release to usenet 7;; Created: Dec 1991 -- first release to usenet
8;; Version: 2.3 8;; Version: 2.3
9;; Keywords: outlines wp languages 9;; Keywords: outlines, wp, languages, PGP, GnuPG
10;; Website: http://myriadicity.net/Sundry/EmacsAllout 10;; Website: http://myriadicity.net/Sundry/EmacsAllout
11 11
12;; This file is part of GNU Emacs. 12;; This file is part of GNU Emacs.
@@ -59,8 +59,8 @@
59;; See the `allout-mode' function's docstring for an introduction to the 59;; See the `allout-mode' function's docstring for an introduction to the
60;; mode. 60;; mode.
61;; 61;;
62;; The latest development version and helpful notes are available at 62;; Directions to the latest development version and helpful notes are
63;; http://myriadicity.net/Sundry/EmacsAllout . 63;; available at http://myriadicity.net/Sundry/EmacsAllout .
64;; 64;;
65;; The outline menubar additions provide quick reference to many of the 65;; The outline menubar additions provide quick reference to many of the
66;; features. See the docstring of the variables `allout-layout' and 66;; features. See the docstring of the variables `allout-layout' and
@@ -76,7 +76,7 @@
76 76
77;;; Code: 77;;; Code:
78 78
79;;;_* Dependency autoloads 79;;;_* Dependency loads
80(require 'overlay) 80(require 'overlay)
81(eval-when-compile 81(eval-when-compile
82 ;; Most of the requires here are for stuff covered by autoloads, which 82 ;; Most of the requires here are for stuff covered by autoloads, which
@@ -94,7 +94,9 @@
94 94
95;;;_ > defgroup allout, allout-keybindings 95;;;_ > defgroup allout, allout-keybindings
96(defgroup allout nil 96(defgroup allout nil
97 "Extensive outline mode for use alone and with other modes." 97 "Extensive outline minor-mode, for use stand-alone and with other modes.
98
99See Allout Auto Activation for automatic activation."
98 :prefix "allout-" 100 :prefix "allout-"
99 :group 'outlines) 101 :group 'outlines)
100(defgroup allout-keybindings nil 102(defgroup allout-keybindings nil
@@ -308,9 +310,7 @@ performing auto-layout is asked of the user each time.
308With value \"activate\", only auto-mode-activation is enabled. 310With value \"activate\", only auto-mode-activation is enabled.
309Auto-layout is not. 311Auto-layout is not.
310 312
311With value nil, neither auto-mode-activation nor auto-layout are 313With value nil, inhibit any automatic allout-mode activation."
312enabled, and allout auto-activation processing is removed from
313file visiting activities."
314 :set 'allout-auto-activation-helper 314 :set 'allout-auto-activation-helper
315 :type '(choice (const :tag "On" t) 315 :type '(choice (const :tag "On" t)
316 (const :tag "Ask about layout" "ask") 316 (const :tag "Ask about layout" "ask")
@@ -752,8 +752,10 @@ Set this var to the bullet you want to use for file cross-references."
752;;;###autoload 752;;;###autoload
753(put 'allout-presentation-padding 'safe-local-variable 'integerp) 753(put 'allout-presentation-padding 'safe-local-variable 'integerp)
754 754
755;;;_ = allout-abbreviate-flattened-numbering 755;;;_ = allout-flattened-numbering-abbreviation
756(defcustom allout-abbreviate-flattened-numbering nil 756(define-obsolete-variable-alias 'allout-abbreviate-flattened-numbering
757 'allout-flattened-numbering-abbreviation "24.0")
758(defcustom allout-flattened-numbering-abbreviation nil
757 "If non-nil, `allout-flatten-exposed-to-buffer' abbreviates topic 759 "If non-nil, `allout-flatten-exposed-to-buffer' abbreviates topic
758numbers to minimal amount with some context. Otherwise, entire 760numbers to minimal amount with some context. Otherwise, entire
759numbers are always used." 761numbers are always used."
@@ -1553,6 +1555,7 @@ See `allout-encryption-ciphertext-rejection-regexps' for rejection reasons.")
1553;;;_ > allout-mode-p () 1555;;;_ > allout-mode-p ()
1554;; Must define this macro above any uses, or byte compilation will lack 1556;; Must define this macro above any uses, or byte compilation will lack
1555;; proper def, if file isn't loaded -- eg, during emacs build! 1557;; proper def, if file isn't loaded -- eg, during emacs build!
1558;;;###autoload
1556(defmacro allout-mode-p () 1559(defmacro allout-mode-p ()
1557 "Return t if `allout-mode' is active in current buffer." 1560 "Return t if `allout-mode' is active in current buffer."
1558 'allout-mode) 1561 'allout-mode)
@@ -5410,7 +5413,7 @@ header and body. The elements of that list are:
5410 bullet))) 5413 bullet)))
5411 (cond ((listp format) 5414 (cond ((listp format)
5412 (list depth 5415 (list depth
5413 (if allout-abbreviate-flattened-numbering 5416 (if allout-flattened-numbering-abbreviation
5414 (allout-stringify-flat-index format 5417 (allout-stringify-flat-index format
5415 gone-out) 5418 gone-out)
5416 (allout-stringify-flat-index-plain 5419 (allout-stringify-flat-index-plain
@@ -6054,7 +6057,7 @@ signal."
6054 (with-temp-buffer 6057 (with-temp-buffer
6055 (insert text) 6058 (insert text)
6056 ;; convey the text characteristics of the original buffer: 6059 ;; convey the text characteristics of the original buffer:
6057 (allout-set-buffer-multibyte multibyte) 6060 (set-buffer-multibyte multibyte)
6058 (when encoding 6061 (when encoding
6059 (set-buffer-file-coding-system encoding) 6062 (set-buffer-file-coding-system encoding)
6060 (if (not decrypt) 6063 (if (not decrypt)
@@ -6673,14 +6676,6 @@ To ignore intangibility, bind `inhibit-point-motion-hooks' to t."
6673 'previous-single-property-change) 6676 'previous-single-property-change)
6674 ;; No docstring because xemacs defalias doesn't support it. 6677 ;; No docstring because xemacs defalias doesn't support it.
6675 ) 6678 )
6676;;;_ > allout-set-buffer-multibyte
6677(if (fboundp 'set-buffer-multibyte)
6678 (defalias 'allout-set-buffer-multibyte 'set-buffer-multibyte)
6679 (with-no-warnings
6680 ;; this definition is used only in older or alternative emacs, where
6681 ;; the setting is our only recourse.
6682 (defun allout-set-buffer-multibyte (is-multibyte)
6683 (set enable-multibyte-characters is-multibyte))))
6684;;;_ > allout-select-safe-coding-system 6679;;;_ > allout-select-safe-coding-system
6685(defalias 'allout-select-safe-coding-system 6680(defalias 'allout-select-safe-coding-system
6686 (if (fboundp 'select-safe-coding-system) 6681 (if (fboundp 'select-safe-coding-system)