(normal-top-level): Set $TERM to `dumb' so that unless

stated otherwise, subprocesses do not send back escape sequences
corresponding to the terminal from which Emacs was started.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 6968d3183eeb304f5f5511e9ddeb52fc06e58753..ff7b73e50c1f894098bf3ec414b15e5406ec41d0 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,9 @@
+2007-08-31  Stefan Monnier  <monnier@iro.umontreal.ca>
+
+       * startup.el (normal-top-level): Set $TERM to `dumb' so that unless
+       stated otherwise, subprocesses do not send back escape sequences
+       corresponding to the terminal from which Emacs was started.
+
 2007-08-31  Thien-Thi Nguyen  <ttn@gnuvola.org>
 
        * calculator.el: Require cl for compilation.
@@ -29,8 +35,8 @@
        (org-cycle): Docstring updated.
        (org-todo-keyword-faces): New option.
        (org-get-todo-face): New function.
-       (org-set-font-lock-defaults, org-agenda-highlight-todo): Use
-       `org-get-todo-face'.
+       (org-set-font-lock-defaults, org-agenda-highlight-todo):
+       Use `org-get-todo-face'.
        (org-switch-to-buffer-other-window): New function.
        (org-table-edit-field, org-table-show-reference)
        (org-table-edit-formulas, org-add-log-note)
@@ -39,10 +45,10 @@
        `switch-to-buffer-other-window' to make sure that the temporary
        windows show up on the current frame.
        (org-mhe-get-message-real-folder, org-batch-store-agenda-views)
-       (org-get-entries-from-diary, org-replace-region-by-html): Don't
-       allow pop-up frames.
-       (org-agenda-get-deadlines, org-agenda-get-scheduled): Fixed
-       problems with time-of-day.
+       (org-get-entries-from-diary, org-replace-region-by-html):
+       Don't allow pop-up frames.
+       (org-agenda-get-deadlines, org-agenda-get-scheduled):
+       Fix problems with time-of-day.
        (org-export-get-title-from-subtree): New function.
        (org-agenda-get-scheduled, org-agenda-get-deadlines): Fix problems
        with listing items that are DONE.
@@ -57,12 +63,12 @@
 
 2007-08-30  Jari Aalto  <jari.aalto@cante.net>  (tiny change)
 
-       * progmodes/grep.el (grep-find-ignored-directories): Add
-       monotone _MTN bookkeeping directory in workspaces.  Add
-       RCS control directory.  List items in alphabetical order.
+       * progmodes/grep.el (grep-find-ignored-directories):
+       Add monotone _MTN bookkeeping directory in workspaces.
+       Add RCS control directory.  List items in alphabetical order.
 
        * progmodes/grep.el (grep-files-aliases): Add cc alias.
-       Sort items in alphabetical order. Fix parens.
+       Sort items in alphabetical order.  Fix parens.
 
 2007-08-29  Dan Nicolaescu  <dann@ics.uci.edu>
 

diff --git a/lisp/startup.el b/lisp/startup.el
index 1f42285d553e002ce1c672571ff7c35da1cf7c53..22cce3f8b38b563eeb00ea442b10ac007dbddd2e 100644 (file)
--- a/lisp/startup.el
+++ b/lisp/startup.el
@@ -486,7 +486,12 @@ or `CVS', and any subdirectory that contains a file named `.nosearch'."
             (run-hooks 'window-setup-hook))
        (or menubar-bindings-done
            (if (display-popup-menus-p)
-               (precompute-menubar-bindings)))))))
+               (precompute-menubar-bindings)))))
+    ;; Subprocesses of Emacs do not have direct access to the terminal, so
+    ;; unless told otherwise they should only assume a dumb terminal.
+    ;; We are careful to do it late (after term-setup-hook), although the
+    ;; new multi-tty code does not use $TERM any more there anyway.
+    (setenv "TERM" "dumb")))
 
 ;; Precompute the keyboard equivalents in the menu bar items.
 (defun precompute-menubar-bindings ()