From 1802e44433f0a36f3a3f877654cb2c2a666893e7 Mon Sep 17 00:00:00 2001
From: Stefan Monnier <monnier@iro.umontreal.ca>
Date: Tue, 23 Aug 2011 01:25:17 -0400
Subject: * lisp/shell.el (shell-completion-vars): Set
 pcomplete-arg-quote-list. * lisp/pcomplete.el (pcomplete-quote-argument): Fix
 thinko.

Fixes: debbugs:9161
---
 lisp/pcomplete.el | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'lisp/pcomplete.el')

diff --git a/lisp/pcomplete.el b/lisp/pcomplete.el
index 02f3c4ad1da..bdf2dadd16c 100644
--- a/lisp/pcomplete.el
+++ b/lisp/pcomplete.el
@@ -883,7 +883,7 @@ Magic characters are those in `pcomplete-arg-quote-list'."
                        (or (run-hook-with-args-until-success
                             'pcomplete-quote-arg-hook filename index)
                            (when (memq c pcomplete-arg-quote-list)
-                             (string "\\" c))
+                             (string ?\\ c))
                            (char-to-string c))
                      (setq index (1+ index))))
                  filename
-- 
cgit v1.2.1