diff options
| author | Juanma Barranquero <lekktu@gmail.com> | 2004-06-02 00:38:00 +0000 |
|---|---|---|
| committer | Juanma Barranquero <lekktu@gmail.com> | 2004-06-02 00:38:00 +0000 |
| commit | faa79da68639cc5d7c5db97b49d4e7bd68796f8c (patch) | |
| tree | 3a4e4e832c85dfe36633b17a105e863af52bf53a | |
| parent | e16e7eacad0d68846887284449bafbdfff55a738 (diff) | |
| download | emacs-faa79da68639cc5d7c5db97b49d4e7bd68796f8c.tar.gz | |
(process-kill-without-query): Remove spurious "\n" on obsolescence string.
(focus-frame, unfocus-frame): Add obsolescence declaration and empty
docstring.
| -rw-r--r-- | lisp/subr.el | 10 |
1 files changed, 6 insertions, 4 deletions
diff --git a/lisp/subr.el b/lisp/subr.el index 9b378c5f06b..b90efd46ff0 100644 --- a/lisp/subr.el +++ b/lisp/subr.el @@ -851,9 +851,11 @@ and `event-end' functions." (make-obsolete 'dot-min 'point-min "before 19.15") (make-obsolete 'dot-marker 'point-marker "before 19.15") (make-obsolete 'buffer-flush-undo 'buffer-disable-undo "before 19.15") -(make-obsolete 'baud-rate "use the baud-rate variable instead." "before 19.15") +(make-obsolete 'baud-rate "use the `baud-rate' variable instead." "before 19.15") (make-obsolete 'compiled-function-p 'byte-code-function-p "before 19.15") (make-obsolete 'define-function 'defalias "20.1") +(make-obsolete 'focus-frame "it does nothing." "19.32") +(make-obsolete 'unfocus-frame "it does nothing." "19.32") (defun insert-string (&rest args) "Mocklisp-compatibility insert function. @@ -870,8 +872,8 @@ is converted into a string by expressing it in decimal." "Return the value of the `baud-rate' variable." baud-rate) -(defalias 'focus-frame 'ignore) -(defalias 'unfocus-frame 'ignore) +(defalias 'focus-frame 'ignore "") +(defalias 'unfocus-frame 'ignore "") ;;;; Obsolescence declarations for variables. @@ -1186,7 +1188,7 @@ Optional args SENTINEL and FILTER specify the sentinel and filter ;; compatibility (make-obsolete 'process-kill-without-query - "use `process-query-on-exit-flag'\nor `set-process-query-on-exit-flag'." + "use `process-query-on-exit-flag' or `set-process-query-on-exit-flag'." "21.5") (defun process-kill-without-query (process &optional flag) "Say no query needed if PROCESS is running when Emacs is exited. |