diff lisp/emulation/viper-util.el @ 16248:b2fae8abc5b0

*** empty log message ***
author Michael Kifer <kifer@cs.stonybrook.edu>
date Fri, 20 Sep 1996 01:10:05 +0000
parents de1340e6ddb4
children 08514f491f33
line wrap: on
line diff
--- a/lisp/emulation/viper-util.el	Fri Sep 20 01:08:36 1996 +0000
+++ b/lisp/emulation/viper-util.el	Fri Sep 20 01:10:05 1996 +0000
@@ -553,7 +553,11 @@
       (setq tmp (cdr tmp)))
     (reverse (apply 'append tmp2))))
 
-      
+(defun vip-convert-standard-file-name (fname)
+  (if vip-emacs-p
+      (convert-standard-filename fname)
+    ;; hopefully, XEmacs adds this functionality
+    fname))