From a8a3608c074c00e32a551c6fa27131b0094c8b2c Mon Sep 17 00:00:00 2001 From: Lars Ingebrigtsen Date: Thu, 25 Aug 2022 14:42:59 +0200 Subject: [PATCH] Make frame-width obsolete as a generalized variable * lisp/emacs-lisp/gv.el (frame-width): Make obsolete as generalized variable. --- etc/NEWS | 14 +++++++------- lisp/emacs-lisp/gv.el | 2 ++ 2 files changed, 9 insertions(+), 7 deletions(-) diff --git a/etc/NEWS b/etc/NEWS index 44ee9b8fc73..7f460e8b881 100644 --- a/etc/NEWS +++ b/etc/NEWS @@ -2599,13 +2599,13 @@ The following generalized variables have been made obsolete: 'current-column', 'current-global-map', 'current-input-mode', 'current-local-map', 'current-window-configuration', 'default-file-modes', 'documentation-property', 'frame-height', -'frame-visible-p', 'global-key-binding', 'local-key-binding', 'mark', -'mark-marker', 'marker-position', 'mouse-position', 'point', -'point-marker', 'point-max', 'point-min', 'read-mouse-position', -'screen-height', 'screen-width', 'selected-frame', 'selected-screen', -'selected-window', 'standard-case-table', 'syntax-table', -'visited-file-modtime', 'window-height', 'window-width', and -'x-get-secondary-selection'. +'frame-width', 'frame-visible-p', 'global-key-binding', +'local-key-binding', 'mark', 'mark-marker', 'marker-position', +'mouse-position', 'point', 'point-marker', 'point-max', 'point-min', +'read-mouse-position', 'screen-height', 'screen-width', +'selected-frame', 'selected-screen', 'selected-window', +'standard-case-table', 'syntax-table', 'visited-file-modtime', +'window-height', 'window-width', and 'x-get-secondary-selection'. * Lisp Changes in Emacs 29.1 diff --git a/lisp/emacs-lisp/gv.el b/lisp/emacs-lisp/gv.el index 770cdb3d4f9..eaab6439adb 100644 --- a/lisp/emacs-lisp/gv.el +++ b/lisp/emacs-lisp/gv.el @@ -706,6 +706,8 @@ REF must have been previously obtained with `gv-ref'." (gv-define-setter frame-width (x &optional frame) `(set-frame-width (or ,frame (selected-frame)) ,x)) +(make-obsolete-generalized-variable 'frame-width 'set-frame-width "29.1") + (gv-define-simple-setter getenv setenv t) (gv-define-simple-setter get-register set-register) -- 2.39.2