[Emacs-diffs] trunk r114269: Fix bug #15337 with non-ASCII characters in file names used by ansi

[Eli Zaretskii]

------------------------------------------------------------
revno: 114269
revision-id: address@hidden
parent: address@hidden
fixes bug: http://debbugs.gnu.org/15337
committer: Eli Zaretskii <address@hidden>
branch nick: trunk
timestamp: Fri 2013-09-13 16:22:47 +0300
message:
  Fix bug #15337 with non-ASCII characters in file names used by ansi
  
   lisp/term.el (term-emulate-terminal): Decode the command string
   before passing it to term-command-hook.
modified:
  lisp/ChangeLog                 changelog-20091113204419-o5vbwnq5f7feedwu-1432
  lisp/term.el                   term.el-20091113204419-o5vbwnq5f7feedwu-794

=== modified file 'lisp/ChangeLog'
--- a/lisp/ChangeLog    2013-09-13 07:12:44 +0000
+++ b/lisp/ChangeLog    2013-09-13 13:22:47 +0000
@@ -1,3 +1,8 @@
+2013-09-13  Eli Zaretskii  <address@hidden>
+
+       * term.el (term-emulate-terminal): Decode the command string
+       before passing it to term-command-hook.  (Bug#15337)
+
 2013-09-13  Glenn Morris  <address@hidden>
 
        * eshell/esh-util.el (ange-cache): Move declaration earlier.

=== modified file 'lisp/term.el'
--- a/lisp/term.el      2013-06-13 05:27:05 +0000
+++ b/lisp/term.el      2013-09-13 13:22:47 +0000
@@ -2937,8 +2937,10 @@
                          (let ((end (string-match "\r?$" str i)))
                            (if end
                                (funcall term-command-hook
-                                        (prog1 (substring str (1+ i) end)
-                                          (setq i (match-end 0))))
+                                        (decode-coding-string
+                                         (prog1 (substring str (1+ i) end)
+                                           (setq i (match-end 0)))
+                                         locale-coding-system))
                              (setq term-terminal-parameter (substring str i))
                              (setq term-terminal-state 4)
                              (setq i str-length))))