diff --git a/gulie/config.scm b/gulie/config.scm index b576efa..8e83a44 100644 --- a/gulie/config.scm +++ b/gulie/config.scm @@ -20,7 +20,7 @@ generate-template)) (define default-config - '((line-length . 80) + '((line-length . 118) (indent . 2) (max-blank-lines . 2) (enable . ()) @@ -71,7 +71,7 @@ (if (null? default) #f (car default))))) (define (config-line-length config) - (or (config-ref config 'line-length) 80)) + (or (config-ref config 'line-length) 118)) (define (config-indent-width config) (or (config-ref config 'indent) 2)) diff --git a/gulie/rules/surface.scm b/gulie/rules/surface.scm index 5a7746b..fa3e146 100644 --- a/gulie/rules/surface.scm +++ b/gulie/rules/surface.scm @@ -32,7 +32,7 @@ ;;; line-length — line exceeds maximum width (define (config-max-line-length config) - (or (assq-ref config 'line-length) 80)) + (or (assq-ref config 'line-length) 118)) (register-rule! (make-rule