Mercurial > emacs
changeset 94158:072ae82c3f6a
(screen-height, screen-width, set-screen-width, set-screen-height):
Add WHEN to obsolescence declaration.
| author | Juanma Barranquero <lekktu@gmail.com> |
|---|---|
| date | Fri, 18 Apr 2008 10:28:42 +0000 |
| parents | f4ec8461e0fc |
| children | fb8d4d8a02dc |
| files | lisp/frame.el |
| diffstat | 1 files changed, 4 insertions(+), 4 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/frame.el Fri Apr 18 10:28:18 2008 +0000 +++ b/lisp/frame.el Fri Apr 18 10:28:42 2008 +0000 @@ -1395,8 +1395,8 @@ (cons (car spec) (frame-geom-value-cons (car spec) (cdr spec)))) ;;;; Aliases for backward compatibility with Emacs 18. -(define-obsolete-function-alias 'screen-height 'frame-height) ;before 19.15 -(define-obsolete-function-alias 'screen-width 'frame-width) ;before 19.15 +(define-obsolete-function-alias 'screen-height 'frame-height "19.7") +(define-obsolete-function-alias 'screen-width 'frame-width "19.7") (defun set-screen-width (cols &optional pretend) "Change the size of the screen to COLS columns. @@ -1432,8 +1432,8 @@ (when (eq (frame-parameter frame 'minibuffer) 'only) (delete-frame frame))))) -(make-obsolete 'set-screen-width 'set-frame-width) ;before 19.15 -(make-obsolete 'set-screen-height 'set-frame-height) ;before 19.15 +(make-obsolete 'set-screen-width 'set-frame-width "19.7") +(make-obsolete 'set-screen-height 'set-frame-height "19.7") ;; miscellaneous obsolescence declarations (define-obsolete-variable-alias 'delete-frame-hook