diff options
| author | Martin Rudalics | 2007-03-24 09:51:52 +0000 |
|---|---|---|
| committer | Martin Rudalics | 2007-03-24 09:51:52 +0000 |
| commit | ae18604f6376c02ea825d810c047094e381a8dda (patch) | |
| tree | cadb16c4e9f3005b4f644816f42ca00b51d6095c | |
| parent | fcbd9af64f977d532e5de7dd8d7bedd4e8c93ea7 (diff) | |
| download | emacs-ae18604f6376c02ea825d810c047094e381a8dda.tar.gz emacs-ae18604f6376c02ea825d810c047094e381a8dda.zip | |
(top level): Remove calls putting
permanent-local nil property since these are no-ops.
| -rw-r--r-- | lisp/ChangeLog | 8 | ||||
| -rw-r--r-- | lisp/whitespace.el | 8 |
2 files changed, 8 insertions, 8 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog index a4a8c3c67bb..51caf6213a9 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog | |||
| @@ -1,3 +1,11 @@ | |||
| 1 | 2007-03-24 Martin Rudalics <rudalics@gmx.at> | ||
| 2 | |||
| 3 | * whitespace.el (top level): Remove calls putting | ||
| 4 | permanent-local nil property since these are no-ops. | ||
| 5 | |||
| 6 | * man.el (Man-support-local-filenames): Assure that | ||
| 7 | default-directory exists when doing call-process. | ||
| 8 | |||
| 1 | 2007-03-23 David Vazquez <xeos00@gmail.com> (tiny change) | 9 | 2007-03-23 David Vazquez <xeos00@gmail.com> (tiny change) |
| 2 | 10 | ||
| 3 | * progmodes/m4-mode.el (m4-m4-buffer, m4-m4-region): Fix | 11 | * progmodes/m4-mode.el (m4-m4-buffer, m4-m4-region): Fix |
diff --git a/lisp/whitespace.el b/lisp/whitespace.el index dc7f691e721..1c670d77458 100644 --- a/lisp/whitespace.el +++ b/lisp/whitespace.el | |||
| @@ -102,42 +102,34 @@ visited by the buffers.") | |||
| 102 | (defvar whitespace-mode nil | 102 | (defvar whitespace-mode nil |
| 103 | "Non-nil when Whitespace mode (a minor mode) is enabled.") | 103 | "Non-nil when Whitespace mode (a minor mode) is enabled.") |
| 104 | (make-variable-buffer-local 'whitespace-mode) | 104 | (make-variable-buffer-local 'whitespace-mode) |
| 105 | (put 'whitespace-mode 'permanent-local nil) | ||
| 106 | 105 | ||
| 107 | (defvar whitespace-mode-line nil | 106 | (defvar whitespace-mode-line nil |
| 108 | "String to display in the mode line for Whitespace mode.") | 107 | "String to display in the mode line for Whitespace mode.") |
| 109 | (make-variable-buffer-local 'whitespace-mode-line) | 108 | (make-variable-buffer-local 'whitespace-mode-line) |
| 110 | (put 'whitespace-mode-line 'permanent-local nil) | ||
| 111 | 109 | ||
| 112 | (defvar whitespace-check-buffer-leading nil | 110 | (defvar whitespace-check-buffer-leading nil |
| 113 | "Test leading whitespace for file in current buffer if t.") | 111 | "Test leading whitespace for file in current buffer if t.") |
| 114 | (make-variable-buffer-local 'whitespace-check-buffer-leading) | 112 | (make-variable-buffer-local 'whitespace-check-buffer-leading) |
| 115 | (put 'whitespace-check-buffer-leading 'permanent-local nil) | ||
| 116 | 113 | ||
| 117 | (defvar whitespace-check-buffer-trailing nil | 114 | (defvar whitespace-check-buffer-trailing nil |
| 118 | "Test trailing whitespace for file in current buffer if t.") | 115 | "Test trailing whitespace for file in current buffer if t.") |
| 119 | (make-variable-buffer-local 'whitespace-check-buffer-trailing) | 116 | (make-variable-buffer-local 'whitespace-check-buffer-trailing) |
| 120 | (put 'whitespace-check-buffer-trailing 'permanent-local nil) | ||
| 121 | 117 | ||
| 122 | (defvar whitespace-check-buffer-indent nil | 118 | (defvar whitespace-check-buffer-indent nil |
| 123 | "Test indentation whitespace for file in current buffer if t.") | 119 | "Test indentation whitespace for file in current buffer if t.") |
| 124 | (make-variable-buffer-local 'whitespace-check-buffer-indent) | 120 | (make-variable-buffer-local 'whitespace-check-buffer-indent) |
| 125 | (put 'whitespace-check-buffer-indent 'permanent-local nil) | ||
| 126 | 121 | ||
| 127 | (defvar whitespace-check-buffer-spacetab nil | 122 | (defvar whitespace-check-buffer-spacetab nil |
| 128 | "Test Space-followed-by-TABS whitespace for file in current buffer if t.") | 123 | "Test Space-followed-by-TABS whitespace for file in current buffer if t.") |
| 129 | (make-variable-buffer-local 'whitespace-check-buffer-spacetab) | 124 | (make-variable-buffer-local 'whitespace-check-buffer-spacetab) |
| 130 | (put 'whitespace-check-buffer-spacetab 'permanent-local nil) | ||
| 131 | 125 | ||
| 132 | (defvar whitespace-check-buffer-ateol nil | 126 | (defvar whitespace-check-buffer-ateol nil |
| 133 | "Test end-of-line whitespace for file in current buffer if t.") | 127 | "Test end-of-line whitespace for file in current buffer if t.") |
| 134 | (make-variable-buffer-local 'whitespace-check-buffer-ateol) | 128 | (make-variable-buffer-local 'whitespace-check-buffer-ateol) |
| 135 | (put 'whitespace-check-buffer-ateol 'permanent-local nil) | ||
| 136 | 129 | ||
| 137 | (defvar whitespace-highlighted-space nil | 130 | (defvar whitespace-highlighted-space nil |
| 138 | "The variable to store the extent to highlight.") | 131 | "The variable to store the extent to highlight.") |
| 139 | (make-variable-buffer-local 'whitespace-highlighted-space) | 132 | (make-variable-buffer-local 'whitespace-highlighted-space) |
| 140 | (put 'whitespace-highlighted-space 'permanent-local nil) | ||
| 141 | 133 | ||
| 142 | ;; For flavors of Emacs which don't define `defgroup' and `defcustom'. | 134 | ;; For flavors of Emacs which don't define `defgroup' and `defcustom'. |
| 143 | (eval-when-compile | 135 | (eval-when-compile |