(command-line-1): Make mode line mouse-sensitive for

the MS-DOS version as well.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 70b9fd0a1543801678b55d90b980cae44d3631cf..3d6eb9e36c3d32388e6fce7c84441d4df51a2a58 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+1999-12-28  Eli Zaretskii  <eliz@is.elta.co.il>
+
+       * startup.el (command-line-1): Make mode line mouse-sensitive for
+       the MS-DOS version as well.
+
 1999-12-28  Gerd Moellmann  <gerd@gnu.org>
 
        * bs.el: New file.

diff --git a/lisp/startup.el b/lisp/startup.el
index e24f564cdc473ce9afe1187e785d931e61f6eb5d..945b71f10b8df7ac276f2d2414e171df45726000 100644 (file)
--- a/lisp/startup.el
+++ b/lisp/startup.el
@@ -808,7 +808,7 @@ If this is nil, no message will be displayed."
                 (substitute-command-keys
                  "For information about the GNU Project and its goals, type \\[describe-project]."))))
   (when (and (not noninteractive)
-            (memq window-system '(x w32)))
+            (memq window-system '(x w32 pc)))
     (make-mode-line-mouse-sensitive))
   (if (null command-line-args-left)
       (cond ((and (not inhibit-startup-message) (not noninteractive)