diff options
author | Katsumi Yamaoka <yamaoka@jpl.org> | 2012-12-05 10:27:16 +0000 |
---|---|---|
committer | Katsumi Yamaoka <yamaoka@jpl.org> | 2012-12-05 10:27:16 +0000 |
commit | 299a66e9820fc91aad2306961471736e69612614 (patch) | |
tree | ddaf874496d672d6e998692d758dd7eb16602974 /lisp/gnus/gmm-utils.el | |
parent | 51b890acbf62bb3b9c10c025413786d69f6c87d4 (diff) | |
download | emacs-299a66e9820fc91aad2306961471736e69612614.tar.gz emacs-299a66e9820fc91aad2306961471736e69612614.tar.bz2 emacs-299a66e9820fc91aad2306961471736e69612614.zip |
gmm-utils.el (gmm-called-interactively-p): Revert. This seems to causes Emacs to get stuck!
Diffstat (limited to 'lisp/gnus/gmm-utils.el')
-rw-r--r-- | lisp/gnus/gmm-utils.el | 12 |
1 files changed, 0 insertions, 12 deletions
diff --git a/lisp/gnus/gmm-utils.el b/lisp/gnus/gmm-utils.el index 2e196158131..91e4965e91c 100644 --- a/lisp/gnus/gmm-utils.el +++ b/lisp/gnus/gmm-utils.el @@ -417,18 +417,6 @@ coding-system." (write-region start end filename append visit lockname)) (write-region start end filename append visit lockname mustbenew))) -;; `interactive-p' is obsolete since Emacs 23.2. -(defalias 'gmm-called-interactively-p - (condition-case nil - (progn - (eval '(called-interactively-p 'any)) - ;; Emacs >=23.2 - 'called-interactively-p) - ;; Emacs <23.2 - (wrong-number-of-arguments '(lambda (kind) (called-interactively-p))) - ;; XEmacs - (void-function '(lambda (kind) (interactive-p))))) - ;; `flet' and `labels' are obsolete since Emacs 24.3. (defmacro gmm-flet (bindings &rest body) "Make temporary overriding function definitions. |