Permalink
Browse files

Merge branch 'fix_quickrun_shell_bug'

  • Loading branch information...
2 parents 179532b + 0b66bff commit 7ec57267944da2ae86d2f331a2c9c25a3f59ecf6 @syohex committed Aug 18, 2012
Showing with 3 additions and 1 deletion.
  1. +3 −1 quickrun.el
View
@@ -40,6 +40,7 @@
(require 'cl))
(require 'ansi-color)
+(require 'em-banner)
(require 'eshell)
(defgroup quickrun nil
@@ -428,7 +429,8 @@ if you set your own language configuration.
(defun quickrun/send-to-shell (cmd-lst)
(let ((cmd-str (quickrun/concat-commands cmd-lst))
- (eshell-buffer-name quickrun/eshell-buffer-name))
+ (eshell-buffer-name quickrun/eshell-buffer-name)
+ (eshell-banner-message ""))
(eshell)
(set (make-local-variable 'quickrun/shell-last-command) cmd-str)
(add-hook 'eshell-post-command-hook 'quickrun/eshell-post-hook)

0 comments on commit 7ec5726

Please sign in to comment.