diff options
| -rw-r--r-- | lisp/bindings.el | 11 | ||||
| -rw-r--r-- | lisp/font-core.el | 5 | ||||
| -rw-r--r-- | lisp/format.el | 2 | ||||
| -rw-r--r-- | lisp/international/mule-cmds.el | 2 | ||||
| -rw-r--r-- | lisp/window.el | 5 |
5 files changed, 18 insertions, 7 deletions
diff --git a/lisp/bindings.el b/lisp/bindings.el index 139a4853918..e6ccbac6eab 100644 --- a/lisp/bindings.el +++ b/lisp/bindings.el | |||
| @@ -153,7 +153,7 @@ corresponding to the mode line clicked." | |||
| 153 | (:propertize ("" (:eval (if (frame-parameter nil 'client) "@" ""))) | 153 | (:propertize ("" (:eval (if (frame-parameter nil 'client) "@" ""))) |
| 154 | help-echo "emacsclient frame")) | 154 | help-echo "emacsclient frame")) |
| 155 | "Mode-line control for identifying emacsclient frames.") | 155 | "Mode-line control for identifying emacsclient frames.") |
| 156 | ;; Autoload all risky properties if this file no longer dumped. | 156 | ;;;###autoload |
| 157 | (put 'mode-line-client 'risky-local-variable t) | 157 | (put 'mode-line-client 'risky-local-variable t) |
| 158 | 158 | ||
| 159 | (defvar mode-line-mule-info | 159 | (defvar mode-line-mule-info |
| @@ -196,6 +196,7 @@ mnemonics of the following coding systems: | |||
| 196 | ;; coding system for encoding text to send to buffer process (if any)." | 196 | ;; coding system for encoding text to send to buffer process (if any)." |
| 197 | ) | 197 | ) |
| 198 | 198 | ||
| 199 | ;;;###autoload | ||
| 199 | (put 'mode-line-mule-info 'risky-local-variable t) | 200 | (put 'mode-line-mule-info 'risky-local-variable t) |
| 200 | (make-variable-buffer-local 'mode-line-mule-info) | 201 | (make-variable-buffer-local 'mode-line-mule-info) |
| 201 | 202 | ||
| @@ -212,12 +213,14 @@ Value is used for `mode-line-frame-identification', which see." | |||
| 212 | ;; the mode line is actually displayed. | 213 | ;; the mode line is actually displayed. |
| 213 | (defvar mode-line-frame-identification '(:eval (mode-line-frame-control)) | 214 | (defvar mode-line-frame-identification '(:eval (mode-line-frame-control)) |
| 214 | "Mode-line control to describe the current frame.") | 215 | "Mode-line control to describe the current frame.") |
| 216 | ;;;###autoload | ||
| 215 | (put 'mode-line-frame-identification 'risky-local-variable t) | 217 | (put 'mode-line-frame-identification 'risky-local-variable t) |
| 216 | 218 | ||
| 217 | (defvar mode-line-process nil "\ | 219 | (defvar mode-line-process nil "\ |
| 218 | Mode-line control for displaying info on process status. | 220 | Mode-line control for displaying info on process status. |
| 219 | Normally nil in most modes, since there is no process to display.") | 221 | Normally nil in most modes, since there is no process to display.") |
| 220 | 222 | ||
| 223 | ;;;###autoload | ||
| 221 | (put 'mode-line-process 'risky-local-variable t) | 224 | (put 'mode-line-process 'risky-local-variable t) |
| 222 | (make-variable-buffer-local 'mode-line-process) | 225 | (make-variable-buffer-local 'mode-line-process) |
| 223 | 226 | ||
| @@ -249,6 +252,7 @@ Normally nil in most modes, since there is no process to display.") | |||
| 249 | 'mouse-face 'mode-line-highlight)) | 252 | 'mouse-face 'mode-line-highlight)) |
| 250 | "Mode-line control for displaying whether current buffer is modified.") | 253 | "Mode-line control for displaying whether current buffer is modified.") |
| 251 | 254 | ||
| 255 | ;;;###autoload | ||
| 252 | (put 'mode-line-modified 'risky-local-variable t) | 256 | (put 'mode-line-modified 'risky-local-variable t) |
| 253 | (make-variable-buffer-local 'mode-line-modified) | 257 | (make-variable-buffer-local 'mode-line-modified) |
| 254 | 258 | ||
| @@ -266,6 +270,7 @@ Normally nil in most modes, since there is no process to display.") | |||
| 266 | "Current directory is local: ") | 270 | "Current directory is local: ") |
| 267 | default-directory))))))) | 271 | default-directory))))))) |
| 268 | "Mode-line flag to show if default-directory for current buffer is remote.") | 272 | "Mode-line flag to show if default-directory for current buffer is remote.") |
| 273 | ;;;###autoload | ||
| 269 | (put 'mode-line-remote 'risky-local-variable t) | 274 | (put 'mode-line-remote 'risky-local-variable t) |
| 270 | 275 | ||
| 271 | (make-variable-buffer-local 'mode-line-remote) | 276 | (make-variable-buffer-local 'mode-line-remote) |
| @@ -275,10 +280,12 @@ Normally nil in most modes, since there is no process to display.") | |||
| 275 | "Mode-line control for displaying the position in the buffer. | 280 | "Mode-line control for displaying the position in the buffer. |
| 276 | Normally displays the buffer percentage and, optionally, the | 281 | Normally displays the buffer percentage and, optionally, the |
| 277 | buffer size, the line number and the column number.") | 282 | buffer size, the line number and the column number.") |
| 283 | ;;;###autoload | ||
| 278 | (put 'mode-line-position 'risky-local-variable t) | 284 | (put 'mode-line-position 'risky-local-variable t) |
| 279 | 285 | ||
| 280 | (defvar mode-line-modes nil | 286 | (defvar mode-line-modes nil |
| 281 | "Mode-line control for displaying major and minor modes.") | 287 | "Mode-line control for displaying major and minor modes.") |
| 288 | ;;;###autoload | ||
| 282 | (put 'mode-line-modes 'risky-local-variable t) | 289 | (put 'mode-line-modes 'risky-local-variable t) |
| 283 | 290 | ||
| 284 | (defvar mode-line-mode-menu (make-sparse-keymap "Minor Modes") "\ | 291 | (defvar mode-line-mode-menu (make-sparse-keymap "Minor Modes") "\ |
| @@ -458,6 +465,7 @@ Its default value is (\"%12b\") with some text properties added. | |||
| 458 | Major modes that edit things other than ordinary files may change this | 465 | Major modes that edit things other than ordinary files may change this |
| 459 | \(e.g. Info, Dired,...)") | 466 | \(e.g. Info, Dired,...)") |
| 460 | 467 | ||
| 468 | ;;;###autoload | ||
| 461 | (put 'mode-line-buffer-identification 'risky-local-variable t) | 469 | (put 'mode-line-buffer-identification 'risky-local-variable t) |
| 462 | (make-variable-buffer-local 'mode-line-buffer-identification) | 470 | (make-variable-buffer-local 'mode-line-buffer-identification) |
| 463 | 471 | ||
| @@ -565,6 +573,7 @@ STRING is included in the mode line if VARIABLE's value is non-nil. | |||
| 565 | 573 | ||
| 566 | Actually, STRING need not be a string; any possible mode-line element | 574 | Actually, STRING need not be a string; any possible mode-line element |
| 567 | is okay. See `mode-line-format'.") | 575 | is okay. See `mode-line-format'.") |
| 576 | ;;;###autoload | ||
| 568 | (put 'minor-mode-alist 'risky-local-variable t) | 577 | (put 'minor-mode-alist 'risky-local-variable t) |
| 569 | ;; Don't use purecopy here--some people want to change these strings. | 578 | ;; Don't use purecopy here--some people want to change these strings. |
| 570 | (setq minor-mode-alist | 579 | (setq minor-mode-alist |
diff --git a/lisp/font-core.el b/lisp/font-core.el index 7112b6b227c..57d0e28262f 100644 --- a/lisp/font-core.el +++ b/lisp/font-core.el | |||
| @@ -1,7 +1,8 @@ | |||
| 1 | ;;; font-core.el --- Core interface to font-lock | 1 | ;;; font-core.el --- Core interface to font-lock |
| 2 | 2 | ||
| 3 | ;; Copyright (C) 1992, 1993, 1994, 1995, 1996, 1997, 1998, 1999, 2000, 2001, | 3 | ;; Copyright (C) 1992, 1993, 1994, 1995, 1996, 1997, 1998, 1999, 2000, 2001, |
| 4 | ;; 2002, 2003, 2004, 2005, 2006, 2007, 2008, 2009 Free Software Foundation, Inc. | 4 | ;; 2002, 2003, 2004, 2005, 2006, 2007, 2008, 2009 |
| 5 | ;; Free Software Foundation, Inc. | ||
| 5 | 6 | ||
| 6 | ;; Maintainer: FSF | 7 | ;; Maintainer: FSF |
| 7 | ;; Keywords: languages, faces | 8 | ;; Keywords: languages, faces |
| @@ -75,7 +76,7 @@ Other variables include that for syntactic keyword fontification, | |||
| 75 | functions, `font-lock-fontify-buffer-function', | 76 | functions, `font-lock-fontify-buffer-function', |
| 76 | `font-lock-unfontify-buffer-function', `font-lock-fontify-region-function', | 77 | `font-lock-unfontify-buffer-function', `font-lock-fontify-region-function', |
| 77 | `font-lock-unfontify-region-function', and `font-lock-inhibit-thing-lock'.") | 78 | `font-lock-unfontify-region-function', and `font-lock-inhibit-thing-lock'.") |
| 78 | ;; Autoload if this file no longer dumped. | 79 | ;;;###autoload |
| 79 | (put 'font-lock-defaults 'risky-local-variable t) | 80 | (put 'font-lock-defaults 'risky-local-variable t) |
| 80 | (make-variable-buffer-local 'font-lock-defaults) | 81 | (make-variable-buffer-local 'font-lock-defaults) |
| 81 | 82 | ||
diff --git a/lisp/format.el b/lisp/format.el index f15026147c7..c04be656b21 100644 --- a/lisp/format.el +++ b/lisp/format.el | |||
| @@ -136,7 +136,7 @@ MODE-FN, if specified, is called when visiting a file with that format. | |||
| 136 | 136 | ||
| 137 | PRESERVE, if non-nil, means that `format-write-file' should not remove | 137 | PRESERVE, if non-nil, means that `format-write-file' should not remove |
| 138 | this format from `buffer-file-format'.") | 138 | this format from `buffer-file-format'.") |
| 139 | ;; Autoload if this file no longer dumped. | 139 | ;;;###autoload |
| 140 | (put 'format-alist 'risky-local-variable t) | 140 | (put 'format-alist 'risky-local-variable t) |
| 141 | 141 | ||
| 142 | ;;; Basic Functions (called from Lisp) | 142 | ;;; Basic Functions (called from Lisp) |
diff --git a/lisp/international/mule-cmds.el b/lisp/international/mule-cmds.el index 7c1d82ad3c6..9d6f6eb4e96 100644 --- a/lisp/international/mule-cmds.el +++ b/lisp/international/mule-cmds.el | |||
| @@ -1342,7 +1342,7 @@ This function is called with no argument.") | |||
| 1342 | Each element has the form: | 1342 | Each element has the form: |
| 1343 | (INPUT-METHOD LANGUAGE-ENV ACTIVATE-FUNC TITLE DESCRIPTION ARGS...) | 1343 | (INPUT-METHOD LANGUAGE-ENV ACTIVATE-FUNC TITLE DESCRIPTION ARGS...) |
| 1344 | See the function `register-input-method' for the meanings of the elements.") | 1344 | See the function `register-input-method' for the meanings of the elements.") |
| 1345 | ;; Autoload if this file no longer dumped. | 1345 | ;;;###autoload |
| 1346 | (put 'input-method-alist 'risky-local-variable t) | 1346 | (put 'input-method-alist 'risky-local-variable t) |
| 1347 | 1347 | ||
| 1348 | (defun register-input-method (input-method lang-env &rest args) | 1348 | (defun register-input-method (input-method lang-env &rest args) |
diff --git a/lisp/window.el b/lisp/window.el index c4dc973f94f..1c77795d098 100644 --- a/lisp/window.el +++ b/lisp/window.el | |||
| @@ -601,8 +601,6 @@ and `same-window-regexps'. Those variables take precedence over | |||
| 601 | this one. | 601 | this one. |
| 602 | 602 | ||
| 603 | See also `special-display-regexps'." | 603 | See also `special-display-regexps'." |
| 604 | ;; Autoload if this file no longer dumped. | ||
| 605 | :risky t | ||
| 606 | :type '(repeat | 604 | :type '(repeat |
| 607 | (choice :tag "Buffer" | 605 | (choice :tag "Buffer" |
| 608 | :value "" | 606 | :value "" |
| @@ -624,6 +622,9 @@ See also `special-display-regexps'." | |||
| 624 | :group 'windows | 622 | :group 'windows |
| 625 | :group 'frames) | 623 | :group 'frames) |
| 626 | 624 | ||
| 625 | ;;;###autoload | ||
| 626 | (put 'special-display-buffer-names 'risky-local-variable t) | ||
| 627 | |||
| 627 | (defcustom special-display-regexps nil | 628 | (defcustom special-display-regexps nil |
| 628 | "List of regexps saying which buffers should be displayed specially. | 629 | "List of regexps saying which buffers should be displayed specially. |
| 629 | Displaying a buffer with `display-buffer' or `pop-to-buffer', if | 630 | Displaying a buffer with `display-buffer' or `pop-to-buffer', if |