From 31358bee6396e0d62653c89bfc0b7ba5cb770d80 Mon Sep 17 00:00:00 2001 From: Jason Rumney Date: Wed, 11 Mar 2009 15:59:30 +0000 Subject: [PATCH] (w32-initialize-window-system): Don't override Japanese font settings. (xlfd-regexp-registry-subnum): Remove unused declaration. (w32-drag-n-drop-debug): Comment out unused debug function. --- lisp/ChangeLog | 2 ++ lisp/term/w32-win.el | 9 ++++----- 2 files changed, 6 insertions(+), 5 deletions(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index fd4d8ef5475..daead11a8d4 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -2,6 +2,8 @@ * term/w32-win.el (w32-initialize-window-system): Don't override Japanese font settings. + (xlfd-regexp-registry-subnum): Remove unused declaration. + (w32-drag-n-drop-debug): Comment out unused debug function. 2009-03-11 Glenn Morris diff --git a/lisp/term/w32-win.el b/lisp/term/w32-win.el index 7555748fee3..da3fab0132a 100644 --- a/lisp/term/w32-win.el +++ b/lisp/term/w32-win.el @@ -85,7 +85,6 @@ (&optional frame exclude-proportional)) (define-obsolete-function-alias 'w32-select-font 'x-select-font "23.1") -(defvar xlfd-regexp-registry-subnum) (defvar w32-color-map) ;; defined in w32fns.c (declare-function w32-send-sys-command "w32fns.c") @@ -98,10 +97,10 @@ ;; The following definition is used for debugging scroll bar events. ;(defun w32-handle-scroll-bar-event (event) (interactive "e") (princ event)) -(defun w32-drag-n-drop-debug (event) - "Print the drag-n-drop EVENT in a readable form." - (interactive "e") - (princ event)) +;; (defun w32-drag-n-drop-debug (event) +;; "Print the drag-n-drop EVENT in a readable form." +;; (interactive "e") +;; (princ event)) (defun w32-drag-n-drop (event) "Edit the files listed in the drag-n-drop EVENT. -- 2.11.4.GIT