gnus-topic.el (gnus-topic-mode): Use gmm-called-interactively-p
authorKatsumi Yamaoka <yamaoka@jpl.org>
Mon, 13 Apr 2015 23:42:06 +0000 (23:42 +0000)
committerKatsumi Yamaoka <yamaoka@jpl.org>
Mon, 13 Apr 2015 23:42:06 +0000 (23:42 +0000)
lisp/gnus-topic.el

index 47cdcbc..656ef80 100644 (file)
@@ -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)