Comment change.

diff --git a/lisp/comint.el b/lisp/comint.el
index 5a2e6f8cbcd9bb3bfbff15047579dd4b5aa58bb1..920cae62b83ab60e5742260ccb13dd0939a760d4 100644 (file)
--- a/lisp/comint.el
+++ b/lisp/comint.el
@@ -728,6 +728,7 @@ buffer.  The hook `comint-exec-hook' is run after each exec."
          ;; and there is no way for us to define it here.
          ;; Some programs that use terminfo get very confused
          ;; if TERM is not a valid terminal type.
+         ;; ;; There is similar code in compile.el.
          (if (and (boundp 'system-uses-terminfo) system-uses-terminfo)
              (list "TERM=dumb" "TERMCAP="
                    (format "COLUMNS=%d" (window-width)))

diff --git a/lisp/progmodes/compile.el b/lisp/progmodes/compile.el
index d58689b460aacb6de059c7c4256535585340cf34..4b2c3ae05dffdbdb87ab6d206124d08859da45dd 100644 (file)
--- a/lisp/progmodes/compile.el
+++ b/lisp/progmodes/compile.el
@@ -903,7 +903,8 @@ Returns the compilation buffer created."
                   (proc (start-process-shell-command (downcase mode-name)
                                                      outbuf
                                                      command)))
-             ;; Set the terminal type
+             ;; Set the terminal type.
+             ;; There is similar code in comint.el.
              (setq process-environment
                    (if (and (boundp 'system-uses-terminfo)
                             system-uses-terminfo)