[Mew-dist 03967] Re: kiki と jiji を表示しよう ! (Re: BDF font durability test)

[小関 吉則 (KOSEKI Yoshinori)]

kose> そんな事を言ったらやってみたくなっちゃうじゃないですかぁ。:-)

Kazu> これは、contrib に入れた方がいいですか？ そうなら、b19 へのパッチを下
Kazu> さい。

ではパッチです。

(Mew.xbmをもう一度ここに流すのは無駄なので[Mew-dist 03485]の
ものを入れてください。)


** for Emacs20 and Mule2.3

0. require bitmap.el
   ftp://ftp.jaist.ac.jp/pub/GNU/elisp/bitmap-mule/
1. patch to mew-demo.el, mew-vars.el
2. cp Mew.xbm mew-icon-directory
3. (setq mew-demo-picture t)

enjoy it.         by kose.

*** mew-demo.el.orig	Thu Jan 29 22:44:47 1998
--- mew-demo.el	Wed Feb 25 10:14:35 1998
***************
*** 78,83 ****
--- 78,89 ----
         )
        (sit-for 0) ;; to redraw
        )
+      ((and (featurep 'bitmap) mew-demo-picture)
+       (bitmap-insert-xbm-file 
+        (expand-file-name mew-icon-mew-mono mew-icon-directory))
+       (center-region (point-min) (point-max))
+       (sit-for 0) ;; to redraw
+       )
       (t
        (insert "/\\\\ - \\\\/")
        (center-line)

*** mew-vars.el.orig	Fri Feb 20 23:18:26 1998
--- mew-vars.el	Wed Feb 25 10:16:41 1998
***************
*** 643,648 ****
--- 643,649 ----
    "*A picture of cats is displayed if non-nil on XEmacs.")
  
  (defvar mew-icon-mew "Mew.xpm")
+ (defvar mew-icon-mew-mono "Mew.xbm")
  
  (defvar mew-logo nil)

--
こせき