diff options
| author | Katsumi Yamaoka <yamaoka@jpl.org> | 2015-04-13 23:42:18 +0000 |
|---|---|---|
| committer | Katsumi Yamaoka <yamaoka@jpl.org> | 2015-04-13 23:42:18 +0000 |
| commit | 56dfd3de9c63dbb6325129de8e38c420808146c9 (patch) | |
| tree | d1429e611413790ce9a6ab7552a6c7dc2a3e0bc9 | |
| parent | 40d67a3b0bf7ef48ec8dc3126206d2079f24cc0b (diff) | |
| download | emacs-56dfd3de9c63dbb6325129de8e38c420808146c9.tar.gz emacs-56dfd3de9c63dbb6325129de8e38c420808146c9.tar.bz2 emacs-56dfd3de9c63dbb6325129de8e38c420808146c9.zip | |
Use gmm-called-interactively-p in Gnus
* lisp/gnus/gnus-topic.el (gnus-topic-mode): Use gmm-called-interactively-p.
| -rw-r--r-- | lisp/gnus/gnus-topic.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/gnus/gnus-topic.el b/lisp/gnus/gnus-topic.el index 47cdcbc50ac..656ef80cc63 100644 --- a/lisp/gnus/gnus-topic.el +++ b/lisp/gnus/gnus-topic.el @@ -1167,7 +1167,7 @@ articles in the topic and its subtopics." (remove-hook 'gnus-check-bogus-groups-hook 'gnus-topic-clean-alist) (setq gnus-group-prepare-function 'gnus-group-prepare-flat) (setq gnus-group-sort-alist-function 'gnus-group-sort-flat)) - (when (called-interactively-p 'any) + (when (gmm-called-interactively-p 'any) (gnus-group-list-groups)))) (defun gnus-topic-select-group (&optional all) |