From: ueno <ueno>
Date: Sat, 27 Apr 2002 19:32:01 +0000 (+0000)
Subject: * lsdb.el (lsdb-mode-save): Don't ask user for saving the database.
X-Git-Tag: lsdb-0_2~5
X-Git-Url: http://git.chise.org/gitweb/?p=elisp%2Flsdb.git;a=commitdiff_plain;h=45ac326b6e1c42a8069ab619093ad1b4dee32a61

* lsdb.el (lsdb-mode-save): Don't ask user for saving the database.
---

diff --git a/lsdb.el b/lsdb.el
index 1e5a691..caa3264 100644
--- a/lsdb.el
+++ b/lsdb.el
@@ -829,13 +829,13 @@ Modify whole identification by side effect."
 		 (point))
 	       (list 'lsdb-record record)))))))))
 
-(defun lsdb-mode-save (&optional ask)
+(defun lsdb-mode-save (&optional dont-ask)
   "Save LSDB hash table into `lsdb-file'."
   (interactive)
   (if (not lsdb-hash-table-is-dirty)
       (message "(No changes need to be saved)")
     (when (or (interactive-p)
-	      (not ask)
+	      dont-ask
 	      (y-or-n-p "Save the LSDB now?"))
       (lsdb-save-file lsdb-file lsdb-hash-table)
       (setq lsdb-hash-table-is-dirty nil)