From f9eb053c9ae986d98a08e559289fb051cd951104 Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Dominik=20Pant=C5=AF=C4=8Dek?= Date: Sat, 1 Apr 2023 22:39:11 +0200 Subject: [PATCH] Remove unused error context parameter. --- src/bbstool.scm | 1 - src/configuration.scm | 4 ---- 2 files changed, 5 deletions(-) diff --git a/src/bbstool.scm b/src/bbstool.scm index 275c645..083dd8c 100644 --- a/src/bbstool.scm +++ b/src/bbstool.scm @@ -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" diff --git a/src/configuration.scm b/src/configuration.scm index bcb7c0b..660952b 100644 --- a/src/configuration.scm +++ b/src/configuration.scm @@ -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))