[Emacs-diffs] /srv/bzr/emacs/trunk r104382: * lisp/shell.el (shell-directory-tracker): Case matters. (Bug#8735)

[Glenn Morris]

------------------------------------------------------------
revno: 104382
committer: Glenn Morris <address@hidden>
branch nick: trunk
timestamp: Thu 2011-05-26 21:54:56 -0400
message:
  * lisp/shell.el (shell-directory-tracker): Case matters.  (Bug#8735)
modified:
  lisp/ChangeLog
  lisp/shell.el

=== modified file 'lisp/ChangeLog'
--- a/lisp/ChangeLog    2011-05-27 01:00:53 +0000
+++ b/lisp/ChangeLog    2011-05-27 01:54:56 +0000
@@ -1,5 +1,7 @@
 2011-05-27  Glenn Morris  <address@hidden>
 
+       * shell.el (shell-directory-tracker): Case matters.  (Bug#8735)
+
        * files.el (set-auto-mode):
        Also respect mode: entries at the end of the file.  (Bug#8586)
 

=== modified file 'lisp/shell.el'
--- a/lisp/shell.el     2011-05-24 02:45:50 +0000
+++ b/lisp/shell.el     2011-05-27 01:54:56 +0000
@@ -704,6 +704,7 @@
                               (concat "^" shell-command-separator-regexp)
                               str) ; skip whitespace
                              (match-end 0)))
+               (case-fold-search)
                end cmd arg1)
            (while (string-match shell-command-regexp str start)
              (setq end (match-end 0)