From 56dfd3de9c63dbb6325129de8e38c420808146c9 Mon Sep 17 00:00:00 2001 From: Katsumi Yamaoka Date: Mon, 13 Apr 2015 23:42:18 +0000 Subject: [PATCH] Use gmm-called-interactively-p in Gnus * lisp/gnus/gnus-topic.el (gnus-topic-mode): Use gmm-called-interactively-p. --- lisp/gnus/gnus-topic.el | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) 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) -- 2.39.2