summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorCarsten Dominik <carsten.dominik@gmail.com>2013-05-12 06:08:09 +0200
committerCarsten Dominik <carsten.dominik@gmail.com>2013-05-12 06:08:09 +0200
commitea98942eecef728de686851fa617140aa5cd3930 (patch)
treedc756e3aaf0391773f93a8487a8bf03764eac79d
parent4e0fad540f3a250df12d60cf304347a38537b56f (diff)
downloadorg-mode-ea98942eecef728de686851fa617140aa5cd3930.tar.gz
Avoid using `case' in default value of defcustom
* lisp/org-ctags.el (org-ctags-path-to-ctags): Avoid usine `case'.
-rw-r--r--lisp/org-ctags.el7
1 files changed, 2 insertions, 5 deletions
diff --git a/lisp/org-ctags.el b/lisp/org-ctags.el
index 833c1dd..98d47e5 100644
--- a/lisp/org-ctags.el
+++ b/lisp/org-ctags.el
@@ -156,11 +156,8 @@ Format is: /REGEXP/TAGNAME/FLAGS,TAGTYPE/
See the ctags documentation for more information.")
(defcustom org-ctags-path-to-ctags
- (case system-type
- (windows-nt "ctags.exe")
- (darwin "ctags-exuberant")
- (t "ctags-exuberant"))
- "Full path to the ctags executable file."
+ (if (executable-find "ctags-exuberant") "ctags-exuberant" "ctags")
+ "Name of the ctags executable file."
:group 'org-ctags
:version "24.1"
:type 'file)