Mercurial > emacs
diff lisp/mouse.el @ 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 | cf541ed1fed8 |
children | b9118969ce28 |
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)))))