[Emacs-diffs] /srv/bzr/emacs/emacs-24 r107985: * lisp/shell.el (shell-parse-pcomplete-arguments):

[Stefan Monnier]

------------------------------------------------------------
revno: 107985
fixes bug(s): http://debbugs.gnu.org/cgi/bugreport.cgi?bug=11348
committer: Stefan Monnier <address@hidden>
branch nick: emacs-24
timestamp: Wed 2012-05-09 13:20:24 -0400
message:
  * lisp/shell.el (shell-parse-pcomplete-arguments):
  Obey pcomplete-arg-quote-list inside double-quoted args as well.
modified:
  lisp/ChangeLog
  lisp/shell.el

=== modified file 'lisp/ChangeLog'
--- a/lisp/ChangeLog    2012-05-08 00:27:13 +0000
+++ b/lisp/ChangeLog    2012-05-09 17:20:24 +0000
@@ -1,3 +1,8 @@
+2012-05-09  Stefan Monnier  <address@hidden>
+
+       * shell.el (shell-parse-pcomplete-arguments): Obey
+       pcomplete-arg-quote-list inside double-quoted args as well (bug#11348).
+
 2012-05-08  Stefan Monnier  <address@hidden>
 
        * shell.el (shell-completion-vars): Fix last change (bug#11348).
@@ -48,8 +53,8 @@
 
 2012-04-30  Martin Rudalics  <address@hidden>
 
-       * window.el (display-buffer--action-function-custom-type): Fix
-       entry.
+       * window.el (display-buffer--action-function-custom-type):
+       Fix entry.
 
 2012-04-27  Alan Mackenzie  <address@hidden>
 
@@ -152,8 +157,8 @@
 
 2012-04-19  Chong Yidong  <address@hidden>
 
-       * progmodes/gdb-mi.el (gdb-inferior-io--maybe-delete-pty): New
-       function to call delete-process on the gdb-inferior buffer's pty.
+       * progmodes/gdb-mi.el (gdb-inferior-io--maybe-delete-pty):
+       New function to call delete-process on the gdb-inferior buffer's pty.
        (gdb-reset): Use it, instead of relying on kill-buffer to kill the
        pty process (Bug#11273).
        (gdb-update): New arg to suppress talking to the gdb process.
@@ -186,8 +191,8 @@
        (c-comment-indent, c-scan-conditionals, c-indent-defun)
        (c-context-line-break): bind case-fold-search to nil.
 
-       * progmodes/cc-mode.el (c-font-lock-fontify-region): bind
-       case-fold-search to nil.
+       * progmodes/cc-mode.el (c-font-lock-fontify-region):
+       bind case-fold-search to nil.
 
 2012-04-16  Chong Yidong  <address@hidden>
 

=== modified file 'lisp/shell.el'
--- a/lisp/shell.el     2012-05-08 00:27:13 +0000
+++ b/lisp/shell.el     2012-05-09 17:20:24 +0000
@@ -400,8 +400,9 @@
                      (t (match-string 3)))
                     arg))
              ((match-beginning 2)       ;Double quote.
-              (push (replace-regexp-in-string
-                     "\\\\\\(.\\)" "\\1" (match-string 2))
+              (push (if (null pcomplete-arg-quote-list) (match-string 2)
+                      (replace-regexp-in-string
+                       "\\\\\\(.\\)" "\\1" (match-string 2)))
                     arg))
              ((match-beginning 1)       ;Single quote.
               (push (match-string 1) arg))