Don't ask to save MML settings without a custom-file.HEADmain

* varuga.el (varuga-invite): Don't ask to save
mml-content-type-parameters without a custom-file.

Signed-off-by: Arun Isaac <arunisaac@systemreboot.net>

1 files changed, 4 insertions, 3 deletions

diff --git a/varuga.el b/varuga.el
index eb8ecef..626dfdf 100644
--- a/varuga.el
+++ b/varuga.el
@@ -172,12 +172,13 @@ PARAMS is an alist of ical property parameters and their values."
 This will add 'method to mml-content-type-parameters, which is
 required for RSVPs to work."))
                (y-or-n-p "Set up RSVP support?")))
-    (if (let ((help-form "\
+    (if (and (custom-file t)
+             (let ((help-form "\
 This will save the value of mml-content-type-parameters in your
 `custom-file', so future sessions will support RSVP without
 prompting you."))
-          (y-or-n-p "Support RSVP in future sessions?"))
-        (customize-push-and-save 'mml-content-type-parameters '(method))
+               (y-or-n-p "Support RSVP in future sessions?")))
+        (customize-save-variable 'mml-content-type-parameters '(method))
       (add-to-list 'mml-content-type-parameters 'method))
     (setq varuga--mml-content-type-confirmed t)))