Comment change.

2 files changed, 3 insertions, 1 deletions

diff --git a/lisp/comint.el b/lisp/comint.el
index 5a2e6f8cbcd..920cae62b83 100644
--- 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 d58689b460a..4b2c3ae05df 100644
--- 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)