From 4fd68bf6cc1dce6c95001fbbac95cef32c86359d Mon Sep 17 00:00:00 2001 From: "Richard M. Stallman" Date: Wed, 2 Apr 2014 13:21:34 -0400 Subject: [PATCH] Revert subr.el workaround for GC bug. * subr.el (set-transient-map): Comment out previous change. --- lisp/ChangeLog | 4 ++++ lisp/subr.el | 5 +++-- 2 files changed, 7 insertions(+), 2 deletions(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 294eb110691..f754e5e852b 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,7 @@ +2014-04-02 Richard Stallman + + * subr.el (set-transient-map): Comment out previous change. + 2014-04-02 Glenn Morris * menu-bar.el (menu-bar-file-menu): diff --git a/lisp/subr.el b/lisp/subr.el index 38ded7d70be..79d90862ed5 100644 --- a/lisp/subr.el +++ b/lisp/subr.el @@ -4316,8 +4316,9 @@ lookup sequence then continues." (remove-hook 'pre-command-hook clearfun) (when on-exit (funcall on-exit)) ;; Comment out the fset if you want to debug the GC bug. - (fset clearfun nil) - (set clearfun nil))))) +;;; (fset clearfun nil) +;;; (set clearfun nil) + )))) (add-hook 'pre-command-hook clearfun) (internal-push-keymap map 'overriding-terminal-local-map))) -- 2.39.5