From c467106d5b795c7d25d6f8d9b12ecf2f250777e3 Mon Sep 17 00:00:00 2001 From: ueno Date: Sat, 27 Aug 2005 00:37:42 +0000 Subject: [PATCH] Fixed. --- lisp/riece-toolbar.el | 6 ++++-- 1 file changed, 4 insertions(+), 2 deletions(-) diff --git a/lisp/riece-toolbar.el b/lisp/riece-toolbar.el index 1335eca..fdad370 100644 --- a/lisp/riece-toolbar.el +++ b/lisp/riece-toolbar.el @@ -86,8 +86,10 @@ (specifier-specs default-toolbar (current-buffer))) (set-specifier default-toolbar toolbar (current-buffer))) (defun riece-unset-toolbar () - (set-specifier default-toolbar riece-toolbar-original-toolbar - (current-buffer)) + (if riece-toolbar-original-toolbar + (set-specifier default-toolbar riece-toolbar-original-toolbar + (current-buffer)) + (remove-specifier default-toolbar (current-buffer))) (kill-local-variable 'riece-toolbar-original-toolbar))) (defalias 'riece-make-toolbar-from-menu 'ignore) (defalias 'riece-set-toolbar 'ignore) -- 1.7.10.4