diff lisp/packages/tar-mode.el @ 155:43dd3413c7c7 r20-3b4

Import from CVS: tag r20-3b4
author cvs
date Mon, 13 Aug 2007 09:39:39 +0200
parents 538048ae2ab8
children 28f395d8dc7a
line wrap: on
line diff
--- a/lisp/packages/tar-mode.el	Mon Aug 13 09:38:27 2007 +0200
+++ b/lisp/packages/tar-mode.el	Mon Aug 13 09:39:39 2007 +0200
@@ -494,7 +494,8 @@
   (define-key tar-mode-map "G" 'tar-chgrp-entry)
   (define-key tar-mode-map "O" 'tar-chown-entry)
 
-  (cond ((string-match "XEmacs" emacs-version)
+  (cond ((and (featurep 'xemacs)
+	      (not (featurep 'infodock)))
 	 (define-key tar-mode-map 'button2 'tar-track-mouse-and-extract-file)
 	 (define-key tar-mode-map 'button3 'tar-popup-menu)))
   )