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:"
|
"Configuration options:"
|
||||||
(-members (dir) "Members base directory" (*members-directory* dir))
|
(-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"
|
(-month (YYYY-MM) "Specify current month"
|
||||||
(*current-month* (string->month YYYY-MM)))
|
(*current-month* (string->month YYYY-MM)))
|
||||||
(-tstyle (style) "Use given table style: debug, ascii, unicode"
|
(-tstyle (style) "Use given table style: debug, ascii, unicode"
|
||||||
|
|
|
@ -29,7 +29,6 @@
|
||||||
configuration
|
configuration
|
||||||
(
|
(
|
||||||
*current-month*
|
*current-month*
|
||||||
*member-file-context*
|
|
||||||
*member-suspend-max-months*
|
*member-suspend-max-months*
|
||||||
*members-directory*
|
*members-directory*
|
||||||
)
|
)
|
||||||
|
@ -47,9 +46,6 @@
|
||||||
(list (+ 1900 (vector-ref d 5))
|
(list (+ 1900 (vector-ref d 5))
|
||||||
(+ (vector-ref d 4) 1)))))
|
(+ (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?
|
;; How long the member can be suspended without any action required?
|
||||||
(define *member-suspend-max-months* (make-parameter 24))
|
(define *member-suspend-max-months* (make-parameter 24))
|
||||||
|
|
||||||
|
|
Loading…
Add table
Add a link
Reference in a new issue