Mercurial > emacs
changeset 4562:477fbf60722b
(font-menu-add-default): Fix previous change.
author | Richard M. Stallman <rms@gnu.org> |
---|---|
date | Wed, 11 Aug 1993 19:20:22 +0000 |
parents | f8a991076926 |
children | b9118969ce28 |
files | lisp/mouse.el |
diffstat | 1 files changed, 1 insertions(+), 1 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/mouse.el Wed Aug 11 19:09:15 1993 +0000 +++ b/lisp/mouse.el Wed Aug 11 19:20:22 1993 +0000 @@ -892,7 +892,7 @@ (if (assoc "Default" elt) (delete (assoc "Default" elt) elt)) (setcdr elt - (cons (cons "Default" + (cons (list "Default" (cdr (assq 'font (frame-parameters (selected-frame))))) (cdr elt)))))