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/gnus-registry.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/gnus-registry.el')
| -rw-r--r-- | lisp/gnus/gnus-registry.el | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/lisp/gnus/gnus-registry.el b/lisp/gnus/gnus-registry.el index 755bf6ecc3f..71e00967548 100644 --- a/lisp/gnus/gnus-registry.el +++ b/lisp/gnus/gnus-registry.el @@ -86,7 +86,6 @@ (require 'nnmail) (require 'easymenu) (require 'registry) -(require 'gmm-utils) (defvar gnus-adaptive-word-syntax-table) @@ -983,7 +982,7 @@ only the last one's marks are returned." (let* ((article (last articles)) (id (gnus-registry-fetch-message-id-fast article)) (marks (when id (gnus-registry-get-id-key id 'mark)))) - (when (gmm-called-interactively-p 'interactive) + (when (interactive-p) (gnus-message 1 "Marks are %S" marks)) marks)) |