Mercurial > hg > xemacs-beta

diff lisp/efs/default-dir.el @ 100:4be1180a9e89 r20-1b2

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r20-1b2
author cvs
date Mon, 13 Aug 2007 09:15:11 +0200
parents 0d2f883870bc
children 8619ce7e4c50
line wrap: on
line diff
--- a/lisp/efs/default-dir.el	Mon Aug 13 09:13:58 2007 +0200
+++ b/lisp/efs/default-dir.el	Mon Aug 13 09:15:11 2007 +0200
@@ -3,7 +3,7 @@
 ;;
 ;; File:         default-dir.el
 ;; RCS:
-;; Version:      $Revision: 1.2 $
+;; Version:      $Revision: 1.3 $
 ;; Description:  Defines the function default-directory, for fancy handling
 ;;               of the initial contents in the minibuffer when reading
 ;;               file names.
@@ -222,7 +222,9 @@
 
 (efs-overwrite-fn "default-dir" 'load-file 'default-dir-load-file)
 
-(require 'view)
+(condition-case nil
+    (require 'view-less)
+  (error (require 'view)))
 
 (defun default-dir-view-file (file)
   "Documented as original"