emacs-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[Emacs-diffs] master e55a467: Use a new user option instead of hard-codi


From: Sam Steingold
Subject: [Emacs-diffs] master e55a467: Use a new user option instead of hard-coding shell display.
Date: Tue, 23 Dec 2014 16:44:54 +0000

branch: master
commit e55a467ec0f758c311d358ceb7d66a8a7d9482c3
Author: Sam Steingold <address@hidden>
Commit: Sam Steingold <address@hidden>

    Use a new user option instead of hard-coding shell display.
    
    * lisp/shell.el (shell-display-buffer-actions): New user option.
    (shell): Pass it to `pop-to-buffer' instead of hard-coding
    `pop-to-buffer-same-window'.
---
 lisp/ChangeLog |   26 ++++----------------------
 lisp/shell.el  |    9 ++++++++-
 2 files changed, 12 insertions(+), 23 deletions(-)

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 12430b6..b7c4596 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,26 +1,8 @@
-2014-12-23  Stefan Monnier  <address@hidden>
+2014-12-23  Sam Steingold  <address@hidden>
 
-       * progmodes/js.el (js--syntax-propertize-regexp-syntax-table): New var.
-       (js-syntax-propertize-regexp): Use it to recognize "slash in
-       a character class" (bug#19397).
-
-2014-12-22  Stefan Monnier  <address@hidden>
-
-       * completion.el: Use post-self-insert-hook (bug#19400).
-       (completion-separator-self-insert-command)
-       (completion-separator-self-insert-autofilling): Remove.
-       (completion-separator-chars): New var.
-       (completion-c-mode-hook, completion-setup-fortran-mode): Use it instead
-       of changing the keymap.
-       (completion--post-self-insert): New function.
-       (dynamic-completion-mode): Use it instead of rebinding keys.
-       (cmpl--completion-string): Rename from completion-string.
-       (add-completion-to-head, delete-completion): Let-bind it explicitly.
-
-2014-12-22  Bozhidar Batsov  <address@hidden>
-
-       * progmodes/ruby-mode.el (ruby--string-region): Simplify code
-       by leveraging `syntax-ppss'.
+       * shell.el (shell-display-buffer-actions): New user option.
+       (shell): Pass it to `pop-to-buffer' instead of hard-coding
+       `pop-to-buffer-same-window'.
 
 2014-12-22  Artur Malabarba  <address@hidden>
 
diff --git a/lisp/shell.el b/lisp/shell.el
index 506f944..480d04a 100644
--- a/lisp/shell.el
+++ b/lisp/shell.el
@@ -308,6 +308,13 @@ for Shell mode only."
                 (const :tag "on" t))
   :group 'shell)
 
+(defcustom shell-display-buffer-actions display-buffer-base-action
+  "The `display-buffer' actions for the `*shell*' buffer."
+  :type display-buffer--action-custom-type
+  :risky t
+  :version "25.1"
+  :group 'shell)
+
 (defvar shell-dirstack nil
   "List of directories saved by pushd in this buffer's shell.
 Thus, this does not include the shell's current directory.")
@@ -718,7 +725,7 @@ Otherwise, one argument `-i' is passed to the shell.
 
   ;; The buffer's window must be correctly set when we call comint (so
   ;; that comint sets the COLUMNS env var properly).
-  (pop-to-buffer-same-window buffer)
+  (pop-to-buffer buffer shell-display-buffer-actions)
   (unless (comint-check-proc buffer)
     (let* ((prog (or explicit-shell-file-name
                     (getenv "ESHELL") shell-file-name))



reply via email to

[Prev in Thread] Current Thread [Next in Thread]