(enable-command, disable-command): Use user-init-file.

diff --git a/lisp/novice.el b/lisp/novice.el
index b874754920959f6d198d31cfe1e17efed809da13..2353edc5719eb1bc013e9ebd3c6786226b28c671 100644 (file)
--- a/lisp/novice.el
+++ b/lisp/novice.el
@@ -90,7 +90,8 @@ to future sessions."
   (interactive "CEnable command: ")
   (put command 'disabled nil)
   (save-excursion
-   (set-buffer (find-file-noselect (substitute-in-file-name "~/.emacs")))
+   (set-buffer (find-file-noselect 
+               (substitute-in-file-name user-init-file)))
    (goto-char (point-min))
    (if (search-forward (concat "(put '" (symbol-name command) " ") nil t)
        (delete-region
@@ -109,7 +110,8 @@ to future sessions."
   (interactive "CDisable command: ")
   (put command 'disabled t)
   (save-excursion
-   (set-buffer (find-file-noselect (substitute-in-file-name "~/.emacs")))
+   (set-buffer (find-file-noselect 
+               (substitute-in-file-name user-init-file)))
    (goto-char (point-min))
    (if (search-forward (concat "(put '" (symbol-name command) " ") nil t)
        (delete-region