comparison src/frame.c @ 6012:650c0f231d17

(Fframe_visible_p): Do FRAME_SAMPLE_VISIBILITY first.
author Richard M. Stallman <rms@gnu.org>
date Sun, 20 Feb 1994 02:50:13 +0000
parents 806e876cacb4
children 24ffc4bc4067
comparison
equal deleted inserted replaced
6011:5ef8aed59f2e 6012:650c0f231d17
964 Return the symbol `icon' if frame is visible only as an icon.") 964 Return the symbol `icon' if frame is visible only as an icon.")
965 (frame) 965 (frame)
966 Lisp_Object frame; 966 Lisp_Object frame;
967 { 967 {
968 CHECK_LIVE_FRAME (frame, 0); 968 CHECK_LIVE_FRAME (frame, 0);
969
970 FRAME_SAMPLE_VISIBILITY (XFRAME (frame));
969 971
970 if (FRAME_VISIBLE_P (XFRAME (frame))) 972 if (FRAME_VISIBLE_P (XFRAME (frame)))
971 return Qt; 973 return Qt;
972 if (FRAME_ICONIFIED_P (XFRAME (frame))) 974 if (FRAME_ICONIFIED_P (XFRAME (frame)))
973 return Qicon; 975 return Qicon;