Mercurial > emacs

comparison lisp/emulation/viper.el @ 16038:8cd162ceb1dc

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(vip-custom-file-name): Use convert-standard-filename.
author Richard M. Stallman <rms@gnu.org>
date Sun, 01 Sep 1996 19:09:14 +0000
parents fa8087fbb7f7
children 102e7d27c135
comparison
equal deleted inserted replaced
16037:a1e88c05b53c 16038:8cd162ceb1dc
819 "Whether Viper startup message should be inhibited.") 819 "Whether Viper startup message should be inhibited.")
820 820
821 (defvar vip-always t 821 (defvar vip-always t
822 "t means, arrange that vi-state will be a default.") 822 "t means, arrange that vi-state will be a default.")
823 823
824 (defvar vip-custom-file-name (cond (vip-vms-os-p "sys$login:.vip") 824 (defvar vip-custom-file-name
825 ((memq system-type '(emx ms-dos)) 825 (convert-standard-filename "~/.vip")
826 "/_vip")
827 ((memq system-type '(windows-nt windows-95))
828 "~/_vip")
829 (t ; Unix
830 "~/.vip"))
831 "Viper customisation file. 826 "Viper customisation file.
832 This variable must be set _before_ loading Viper.") 827 This variable must be set _before_ loading Viper.")
833 828
834 829
835 (defvar vip-spell-function 'ispell-region 830 (defvar vip-spell-function 'ispell-region