X-Git-Url: http://git.chise.org/gitweb/?a=blobdiff_plain;f=lisp%2Fx-win-sun.el;h=273a862be7d4ff117bf906bed944e52190c2da4a;hb=b789f10f9aad510d2bf4ee3e3ca6b1b86341b645;hp=b59dd827585e3f2c77f586a232132f0e6cabc6ef;hpb=77dcef404dc78635f6ffa8f71a803d2bc7cc8921;p=chise%2Fxemacs-chise.git.1

diff --git a/lisp/x-win-sun.el b/lisp/x-win-sun.el
index b59dd82..273a862 100644
--- a/lisp/x-win-sun.el
+++ b/lisp/x-win-sun.el
@@ -246,8 +246,10 @@ to more mnemonic ones,like `kp-3'."
 ;;; themselves are in x-win.el in case someone wants to use them when
 ;;; not running on a Sun display.)
 
-  (define-key global-map 'find		'ow-find)
-  (define-key global-map '(shift find)	'ow-find-backward)
+  (or (lookup-key global-map 'find)
+      (define-key global-map 'find 'ow-find))
+  (or (lookup-key global-map '(shift find))
+       (define-key global-map '(shift find) 'ow-find-backward))
 
   )