comparison lisp/play/spook.el @ 32296:dbb638e8f5d5

(spook-phrases-file): Use expand-file-name, not concat.
author Dave Love <fx@gnu.org>
date Sun, 08 Oct 2000 17:32:00 +0000
parents f1fc193b6958
children 695cf19ef79e d7ddb3e565de
comparison
equal deleted inserted replaced
32295:a25a7ebfcb34 32296:dbb638e8f5d5
43 (defgroup spook nil 43 (defgroup spook nil
44 "Spook phrase utility for overloading the NSA line eater." 44 "Spook phrase utility for overloading the NSA line eater."
45 :prefix "spook-" 45 :prefix "spook-"
46 :group 'games) 46 :group 'games)
47 47
48 (defcustom spook-phrases-file (concat data-directory "spook.lines") 48 (defcustom spook-phrases-file (expand-file-name "spook.lines" data-directory)
49 "Keep your favorite phrases here." 49 "Keep your favorite phrases here."
50 :type 'file 50 :type 'file
51 :group 'spook) 51 :group 'spook)
52 52
53 (defcustom spook-phrase-default-count 15 53 (defcustom spook-phrase-default-count 15