comparison lisp/term/pc-win.el @ 412:697ef44129c6 r21-2-14

Import from CVS: tag r21-2-14
author cvs
date Mon, 13 Aug 2007 11:20:41 +0200
parents 74fd4e045ea6
children
comparison
equal deleted inserted replaced
411:12e008d41344 412:697ef44129c6
112 (set-face-background 'msdos-menu-select-face "red")) 112 (set-face-background 'msdos-menu-select-face "red"))
113 113
114 ;; We have only one font, so... 114 ;; We have only one font, so...
115 (add-hook 'before-init-hook 'msdos-face-setup) 115 (add-hook 'before-init-hook 'msdos-face-setup)
116 ;; --------------------------------------------------------------------------- 116 ;; ---------------------------------------------------------------------------
117 ;; More or less useful imitations of certain X-functions. A lot of the 117 ;; More or less useful immitations of certain X-functions. A lot of the
118 ;; values returned are questionable, but usually only the form of the 118 ;; values returned are questionable, but usually only the form of the
119 ;; returned value matters. Also, by the way, recall that `ignore' is 119 ;; returned value matters. Also, by the way, recall that `ignore' is
120 ;; a useful function for returning 'nil regardless of argument. 120 ;; a useful function for returning 'nil regardless of argument.
121 121
122 ;; From src/xfns.c 122 ;; From src/xfns.c