From: Richard M. Stallman <rms@gnu.org>
Date: Sun, 1 Sep 1996 19:09:14 +0000 (+0000)
Subject: (vip-custom-file-name): Use convert-standard-filename.
X-Git-Tag: emacs-20.1~3906
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=7003b258300d0e575da8009e6f017b6c19aabacb;p=emacs.git

(vip-custom-file-name): Use convert-standard-filename.
---

diff --git a/lisp/emulation/viper.el b/lisp/emulation/viper.el
index 824e6823a82..d017e4c7c4f 100644
--- a/lisp/emulation/viper.el
+++ b/lisp/emulation/viper.el
@@ -821,13 +821,8 @@ These buffers can be cycled through via :R and :P commands.")
 (defvar vip-always t
   "t means, arrange that vi-state will be a default.")
 
-(defvar vip-custom-file-name (cond (vip-vms-os-p "sys$login:.vip")
-				   ((memq system-type '(emx ms-dos))
-				    "/_vip")
-				   ((memq system-type '(windows-nt windows-95))
-				    "~/_vip")
-				   (t ; Unix
-				    "~/.vip"))
+(defvar vip-custom-file-name
+  (convert-standard-filename "~/.vip")
   "Viper customisation file.
 This variable must be set _before_ loading Viper.")