Changes committed gnus/lisp (ChangeLog dgnushack.el lpath.el)

Modified: ChangeLog dgnushack.el lpath.el

* dgnushack.el: Autoload get-display-table and put-display-table for XEmacs
 21.5.

* lpath.el: Fbind get-display-table and put-display-table for XEmacs 21.4 and
 SXEmacs.


Index: ChangeLog
diff -u gnus/lisp/ChangeLog:7.1882 gnus/lisp/ChangeLog:7.1883
--- ChangeLog:7.1882	Sun Jun 15 18:14:01 2008
+++ ChangeLog	Mon Jun 16 02:03:09 2008
@@ -1,3 +1,11 @@
+2008-06-16  Katsumi Yamaoka  <[email protected]>
+
+	* dgnushack.el: Autoload get-display-table and put-display-table for
+	XEmacs 21.5.
+
+	* lpath.el: Fbind get-display-table and put-display-table for XEmacs
+	21.4 and SXEmacs.
+
 2008-06-15  David Engster  <[email protected]>
 
 	* nnimap.el (nnimap-request-delete-group): Unselect group if necessary.
Index: dgnushack.el
diff -u gnus/lisp/dgnushack.el:7.34 gnus/lisp/dgnushack.el:7.35
--- dgnushack.el:7.34	Mon May 26 10:36:06 2008
+++ dgnushack.el	Mon Jun 16 02:03:09 2008
@@ -230,6 +230,10 @@
     (autoload 'eudc-expand-inline "eudc" nil t)
     (autoload 'executable-find "executable")
     (autoload 'font-lock-fontify-buffer "font-lock" nil t)
+    (when (and (emacs-version>= 21 5)
+	       (not (featurep 'sxemacs)))
+      (autoload 'get-display-table "disp-table.el")
+      (autoload 'put-display-table "disp-table.el"))
     (autoload 'info "info" nil t)
     (autoload 'mail-extract-address-components "mail-extr")
     (autoload 'mail-fetch-field "mail-utils")
Index: lpath.el
diff -u gnus/lisp/lpath.el:7.42 gnus/lisp/lpath.el:7.43
--- lpath.el:7.42	Sat Jun  7 00:56:13 2008
+++ lpath.el	Mon Jun 16 02:03:09 2008
@@ -79,8 +79,8 @@
     (maybe-fbind
      '(custom-autoload
        display-graphic-p display-images-p display-visual-class
-       select-frame-set-input-focus unicode-precedence-list w32-focus-frame
-       x-focus-frame))
+       get-display-table put-display-table select-frame-set-input-focus
+       unicode-precedence-list w32-focus-frame x-focus-frame))
     (maybe-bind
      '(default-file-name-coding-system)))