From 49151bac191b6088ce6765a3db5448acd2153911 Mon Sep 17 00:00:00 2001 From: David Aspinall Date: Wed, 26 Jan 2011 21:27:30 +0000 Subject: ns-popup-font-panel: pass through argument list (used in Aquamacs Options menu). --- lib/unicode-tokens.el | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'lib') diff --git a/lib/unicode-tokens.el b/lib/unicode-tokens.el index 64c12791..75082806 100644 --- a/lib/unicode-tokens.el +++ b/lib/unicode-tokens.el @@ -1203,10 +1203,10 @@ Commands available are: (t (apply 'old-ns-respond-to-change-font args)))) - (defun ns-popup-font-panel () + (defun ns-popup-font-panel (&rest args) (setq unicode-tokens-respond-to-change-font nil) (with-no-warnings - (old-ns-popup-font-panel))) + (apply 'old-ns-popup-font-panel args))) (defun unicode-tokens-popup-font-panel (fontvar) (setq unicode-tokens-respond-to-change-font fontvar) -- cgit v1.2.3