Rename jendasap-checked to checked-file.

src/configuration.scm

@@ -32,7 +32,7 @@
   
   *members-directory*
   *apikeys-file*
-  *jendasap-checked*
+  *checked-file*
   *bank-dir*
   *email-from*
   *summary-mailto*
@@ -63,8 +63,8 @@
  (define =apikeys-file= "apikey.ntlm")
 
  ;; Old last checket transaction id support
- (define *jendasap-checked* (make-parameter #f))
- (define =jendasap-checked= "checked.ntlm")
+ (define *checked-file* (make-parameter #f))
+ (define =checked-file= "checked.ntlm")
 
  ;; Where are the bank CSV files
  (define *bank-dir* (make-parameter #f))
@@ -96,9 +96,9 @@
 		 ((apikeys-file)
 		  (when (not (*apikeys-file*))
 		    (*apikeys-file* v)))
-		 ((jendasap-checked)
-		  (when (not (*jendasap-checked*))
-		    (*jendasap-checked* v)))
+		 ((jendasap-checked checked-file)
+		  (when (not (*checked-file*))
+		    (*checked-file* v)))
 		 ((bank-dir)
 		  (when (not (*bank-dir*))
 		    (*bank-dir* v)))
@@ -114,8 +114,8 @@
      (*members-directory* =members-directory=))
    (when (not (*apikeys-file*))
      (*apikeys-file* =apikeys-file=))
-   (when (not (*jendasap-checked*))
-     (*jendasap-checked* =jendasap-checked=))
+   (when (not (*checked-file*))
+     (*checked-file* =checked-file=))
    ;; No bank-dir - #f default
    (when (not (*email-from*))
      (*email-from* =email-from=))

src/hackerbase.scm

@@ -98,8 +98,8 @@
 	  (*apikeys-file* fname))
  (-bankdir (dir) "Where are bank CSV files"
 	   (*bank-dir* dir))
- (-checked (file) "JendaSAP checked.ntlm file"
-	   (*jendasap-checked* file))
+ (-checked (file) "File with last checked bank transaction ID"
+	   (*checked-file* file))
  ""
  "Email options:"
  (-from (email) "Sender email address"
@@ -215,7 +215,7 @@
   (if (-action-)
       (let ((mb (load-mbase (*members-directory*) #t)))
 	(if (-needs-bank-)
-	    (members-payments-process mb (*apikeys-file*) (*bank-dir*) (*jendasap-checked*))
+	    (members-payments-process mb (*apikeys-file*) (*bank-dir*) (*checked-file*))
 	    mb))
       #f))