Remove unused error context parameter.
This commit is contained in:
parent
d6d47e91fc
commit
f9eb053c9a
2 changed files with 0 additions and 5 deletions
|
@ -78,7 +78,6 @@ CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
|
|||
""
|
||||
"Configuration options:"
|
||||
(-members (dir) "Members base directory" (*members-directory* dir))
|
||||
(-context (n) "Member-File parser Error Context (lines)" (*member-file-context* (string->number n)))
|
||||
(-month (YYYY-MM) "Specify current month"
|
||||
(*current-month* (string->month YYYY-MM)))
|
||||
(-tstyle (style) "Use given table style: debug, ascii, unicode"
|
||||
|
|
|
@ -29,7 +29,6 @@
|
|||
configuration
|
||||
(
|
||||
*current-month*
|
||||
*member-file-context*
|
||||
*member-suspend-max-months*
|
||||
*members-directory*
|
||||
)
|
||||
|
@ -47,9 +46,6 @@
|
|||
(list (+ 1900 (vector-ref d 5))
|
||||
(+ (vector-ref d 4) 1)))))
|
||||
|
||||
;; Configuration of error reporting
|
||||
(define *member-file-context* (make-parameter 3))
|
||||
|
||||
;; How long the member can be suspended without any action required?
|
||||
(define *member-suspend-max-months* (make-parameter 24))
|
||||
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue