summaryrefslogtreecommitdiff
path: root/japanese/lookup-emacs21/files/patch-aa
diff options
context:
space:
mode:
authorSatoshi Taoka <taoka@FreeBSD.org>2000-07-10 17:36:21 +0000
committerSatoshi Taoka <taoka@FreeBSD.org>2000-07-10 17:36:21 +0000
commit3c94e67047a4761bbc4f98a2eaa6533a3a3e02ea (patch)
treef7de83f1f28f546b958ac84af31a611f2a1506b9 /japanese/lookup-emacs21/files/patch-aa
parentUpdate to version 1.3 (diff)
lookup-1.3 has two bugs (do not do lookup-splash on XEmacs and
unable to compile on mule-2.3). These patches is to fix these problems.
Notes
Notes: svn path=/head/; revision=30454
Diffstat (limited to '')
-rw-r--r--japanese/lookup-emacs21/files/patch-aa20
1 files changed, 20 insertions, 0 deletions
diff --git a/japanese/lookup-emacs21/files/patch-aa b/japanese/lookup-emacs21/files/patch-aa
new file mode 100644
index 000000000000..8a3102c17c57
--- /dev/null
+++ b/japanese/lookup-emacs21/files/patch-aa
@@ -0,0 +1,20 @@
+--- lisp/lookup.el~ Fri Jun 16 12:44:14 2000
++++ lisp/lookup.el Sun Jun 25 00:53:24 2000
+@@ -620,7 +620,8 @@
+ (defmacro logo-image ()
+ (with-temp-buffer
+ (cond ((featurep 'xemacs)
+- (insert-file-contents lookup-logo-file))
++ (let ((format-alist nil))
++ (insert-file-contents lookup-logo-file)))
+ ((locate-library "bitmap")
+ (require 'bitmap)
+ (bitmap-insert-xbm-file lookup-logo-file)
+@@ -637,6 +638,7 @@
+ (or lookup-use-bitmap (featurep 'xemacs)))
+ (let ((buffer (get-buffer-create "*Lookup Logo*")))
+ (set-buffer buffer)
++ (setq fill-column (window-width))
+ (erase-buffer)
+ (if (featurep 'xemacs)
+ (let ((logo-glyph (make-glyph (vector 'xpm :data lookup-logo-image)))