;; gse-start-bash-here.el
;;   Summary:     Open an rxvt/bash window in the current directory.
;;   Author:      Scott Evans <gse@antisleep.com>
;;   Home:        http://www.antisleep.com/elisp
;;   Time-stamp:  <2004.12.23 00:10:49 gse>
;;
;; Commentary:
;;   I use this about 430 times a days.  Not sure if it'll work on
;;   non-Windows systems.
;;
;; Installation:
;;   (require 'gse-start-bash-here)
;;   (global-set-key [(control f9)] 'gse-start-bash-here)
;;
;;---------------------------------------------------------------------------
;; Change Log
;; ----------
;; 2004.12.23 Created.
;;---------------------------------------------------------------------------

(defun gse-start-bash-here()
  "Open a bash window in the current directory."
  (interactive)
  ;; I'd like to use mswindows-shell-execute but it doesn't seem to start
  ;; in the current directory, or provide a way to specify start directory.
  (start-process-shell-command
   "*gse-bash*"
   nil
   "rxvt"
   "-e bash"))

;;---------------------------------------------------------------------------

(provide 'gse-start-bash-here)