aboutsummaryrefslogtreecommitdiff
path: root/sx-tab.el
diff options
context:
space:
mode:
authorArtur Malabarba <bruce.connor.am@gmail.com>2015-01-01 22:25:00 -0200
committerArtur Malabarba <bruce.connor.am@gmail.com>2015-01-01 22:25:00 -0200
commit6cc480fdab287133d6e09a9ad1eba260b891b604 (patch)
treef54e0334389bb0f017b75b3e91061994f2fc44e3 /sx-tab.el
parent026a6903e2bcc3a63da3db203b44516d9da3d9e4 (diff)
parente05f937910bb4ca0e7ea1c9f1273fbafac523921 (diff)
Merge branch 'master' into inbox
Conflicts: sx-question.el sx.el
Diffstat (limited to 'sx-tab.el')
-rw-r--r--sx-tab.el8
1 files changed, 4 insertions, 4 deletions
diff --git a/sx-tab.el b/sx-tab.el
index 6c5e21e..32a7784 100644
--- a/sx-tab.el
+++ b/sx-tab.el
@@ -34,10 +34,10 @@
(defun sx-tab-switch (tab)
"Switch to another question-list tab."
(interactive
- (list (funcall (if ido-mode #'ido-completing-read #'completing-read)
- "Switch to tab: " sx-tab--list
- (lambda (tab) (not (equal tab sx-question-list--current-tab)))
- t)))
+ (list (sx-completing-read
+ "Switch to tab: " sx-tab--list
+ (lambda (tab) (not (equal tab sx-question-list--current-tab)))
+ t)))
(funcall (intern (format "sx-tab-%s" (downcase tab)))))