;ELC   
;;; Compiled by leavens@LEAVENS on Wed Aug 23 15:17:05 2006
;;; from file d:/emacs/demo-frame.el
;;; in Emacs version 21.3.1
;;; with bytecomp version 2.85.4.1
;;; with all optimizations.

;;; This file uses dynamic docstrings, first added in Emacs 19.29.
(if (and (boundp 'emacs-version)
	 (< (aref emacs-version (1- (length emacs-version))) ?A)
	 (or (and (boundp 'epoch::version) epoch::version)
	     (string-lessp emacs-version "19.29")))
    (error "`demo-frame.el' was compiled for Emacs 19.29 or later"))

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;


#@22 Demonstration frame.
(defvar demoframe nil (#$ . 591))
#@52 Create a frame with suitable dimensions for demos.
(defalias 'demo-frame #[nil "\301\302!\303!\210\304\305!\207" [demoframe make-frame ((user-position . f) (name . "Demo Screen") (height . 20) (width . 57) (minibuffer . t)) select-frame set-default-font "-*-Courier*-bold-r-*-*-*-240-*-*-*-*-iso8859-1"] 2 (#$ . 652) nil])