comparison lisp/msw-glyphs.el @ 272:c5d627a313b1 r21-0b34

Import from CVS: tag r21-0b34
author cvs
date Mon, 13 Aug 2007 10:28:48 +0200
parents 966663fcf606
children 90d73dddcdc4
comparison
equal deleted inserted replaced
271:c7b7086b0a39 272:c5d627a313b1
69 (set-glyph-image octal-escape-glyph "\\") 69 (set-glyph-image octal-escape-glyph "\\")
70 (set-glyph-image control-arrow-glyph "^") 70 (set-glyph-image control-arrow-glyph "^")
71 (set-glyph-image invisible-text-glyph " ...") 71 (set-glyph-image invisible-text-glyph " ...")
72 72
73 (cond ((featurep 'xpm) 73 (cond ((featurep 'xpm)
74 (set-glyph-image frame-icon-glyph
75 (concat "../etc/" "xemacs-icon.xpm")
76 'global 'mswindows)
74 (set-glyph-image xemacs-logo 77 (set-glyph-image xemacs-logo
75 (concat "../etc/" 78 (concat "../etc/"
76 (if emacs-beta-version 79 (if emacs-beta-version
77 "xemacs-beta.xpm" 80 "xemacs-beta.xpm"
78 "xemacs.xpm")) 81 "xemacs.xpm"))