aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorEli Zaretskii2013-09-05 15:43:11 +0300
committerEli Zaretskii2013-09-05 15:43:11 +0300
commit5877bb8d7e55eda3f81a36bfabe4dd816a34269f (patch)
tree779550b544f248132cd97c819070fb8aa0aa8bd7
parente7873136dd8dbacbbebf534500355d29a07fed8e (diff)
downloademacs-5877bb8d7e55eda3f81a36bfabe4dd816a34269f.tar.gz
emacs-5877bb8d7e55eda3f81a36bfabe4dd816a34269f.zip
Removed unnecessary tests for GUI sessions and created menu faces.
-rw-r--r--lisp/dired.el2
-rw-r--r--lisp/faces.el11
-rw-r--r--src/menu.c7
3 files changed, 10 insertions, 10 deletions
diff --git a/lisp/dired.el b/lisp/dired.el
index f830623a255..b9f974234fb 100644
--- a/lisp/dired.el
+++ b/lisp/dired.el
@@ -4352,7 +4352,7 @@ instead.
4352 4352
4353;;;*** 4353;;;***
4354 4354
4355;;;### (autoloads nil "dired-x" "dired-x.el" "1419d865898f84c17f172320e578380c") 4355;;;### (autoloads nil "dired-x" "dired-x.el" "130484d4c94bb9929c210774f9e475f5")
4356;;; Generated autoloads from dired-x.el 4356;;; Generated autoloads from dired-x.el
4357 4357
4358(autoload 'dired-jump "dired-x" "\ 4358(autoload 'dired-jump "dired-x" "\
diff --git a/lisp/faces.el b/lisp/faces.el
index 9a34aec2549..f5957d9dbad 100644
--- a/lisp/faces.el
+++ b/lisp/faces.el
@@ -2135,8 +2135,15 @@ terminal type to a different value."
2135(defun tty-set-up-initial-frame-faces () 2135(defun tty-set-up-initial-frame-faces ()
2136 (let ((frame (selected-frame))) 2136 (let ((frame (selected-frame)))
2137 (frame-set-background-mode frame t) 2137 (frame-set-background-mode frame t)
2138 (face-set-after-frame-default frame))) 2138 (face-set-after-frame-default frame)
2139 2139 (make-face 'tty-menu-enabled-face)
2140 (make-face 'tty-menu-disabled-face)
2141 (make-face 'tty-menu-selected-face)
2142 (set-face-foreground 'tty-menu-enabled-face "yellow")
2143 (set-face-foreground 'tty-menu-disabled-face "white")
2144 (set-face-background 'tty-menu-enabled-face "blue")
2145 (set-face-background 'tty-menu-disabled-face "blue")
2146 (set-face-background 'tty-menu-selected-face "red")))
2140 2147
2141 2148
2142;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; 2149;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
diff --git a/src/menu.c b/src/menu.c
index 2b199ffdf09..b9d1b7668b1 100644
--- a/src/menu.c
+++ b/src/menu.c
@@ -1077,8 +1077,6 @@ no quit occurs and `x-popup-menu' returns nil. */)
1077 { 1077 {
1078 bool get_current_pos_p = 0; 1078 bool get_current_pos_p = 0;
1079 1079
1080 check_window_system (SELECTED_FRAME ());
1081
1082 /* Decode the first argument: find the window and the coordinates. */ 1080 /* Decode the first argument: find the window and the coordinates. */
1083 if (EQ (position, Qt) 1081 if (EQ (position, Qt)
1084 || (CONSP (position) && (EQ (XCAR (position), Qmenu_bar) 1082 || (CONSP (position) && (EQ (XCAR (position), Qmenu_bar)
@@ -1194,11 +1192,6 @@ no quit occurs and `x-popup-menu' returns nil. */)
1194 xpos += XINT (x); 1192 xpos += XINT (x);
1195 ypos += XINT (y); 1193 ypos += XINT (y);
1196 1194
1197 /* FIXME: Find a more general check! */
1198 if (!(FRAME_X_P (f) || FRAME_MSDOS_P (f)
1199 || FRAME_W32_P (f) || FRAME_NS_P (f)))
1200 error ("Can not put GUI menu on this terminal");
1201
1202 XSETFRAME (Vmenu_updating_frame, f); 1195 XSETFRAME (Vmenu_updating_frame, f);
1203 } 1196 }
1204#endif /* HAVE_MENUS */ 1197#endif /* HAVE_MENUS */