Default to the default shell

Use $SHELL by default, and fall back to /bin/bash.
emacsmirror · Oct 13, 2015 · 145a30b · 145a30b
1 parent fd969c1
commit 145a30b
Showing 1 changed file with 3 additions and 3 deletions.
diff --git a/shell-pop.el b/shell-pop.el
@@ -40,8 +40,8 @@
 ;; custom shell if you use other configuration.
 
 ;; For `terminal' and `ansi-term' options, you can set the underlying
-;; shell by customizing `shell-pop-term-shell'.  By default, `/bin/bash'
-;; is used, but you can also use `/bin/tcsh', `/bin/zsh' or others.
+;; shell by customizing `shell-pop-term-shell'.  By default, `$SHELL'
+;; is used, with a fallback to `/bin/bash'.
 ;;
 ;; Use M-x customize-group RET shell-pop RET to set further options
 ;; such as hotkey, window height and position.
@@ -132,7 +132,7 @@ The value is a list with these items:
   :set 'shell-pop--set-shell-type
   :group 'shell-pop)
 
-(defcustom shell-pop-term-shell "/bin/bash"
+(defcustom shell-pop-term-shell (or (getenv "SHELL") "/bin/bash")
   "Shell used in `term' and `ansi-term'."
   :type 'string
   :group 'shell-pop)