commit 8621ed2a1e4566dd7023d1f7fa4226e5353a96f8 from: Omar Polo date: Sun Nov 07 13:51:51 2021 UTC rename a68-indent-step -> -level commit - bb4b3a620e4b129ae3cbba1e6f29534a572e0fbf commit + 8621ed2a1e4566dd7023d1f7fa4226e5353a96f8 blob - 471a00d1e5259d28e7688775836b6618b9d25ba0 blob + 34605fe3567f1b56a62a6921a6dc9ebda5762786 --- a68-mode.el +++ a68-mode.el @@ -47,7 +47,7 @@ (eval-when-compile (require 'rx)) -(defvar a68-indent-step 3 +(defvar a68-indent-level 3 "Indentation step for Algol 68.") (defvar a68-mode-hook '() @@ -145,7 +145,7 @@ (progn (save-excursion (forward-line -1) - (setq cur-indent (- (current-indentation) a68-indent-step))) + (setq cur-indent (- (current-indentation) a68-indent-level))) (when (< cur-indent 0) (setq cur-indent 0))) (save-excursion @@ -158,7 +158,7 @@ ;; Check for rule 4 (if (looking-at begin-indent-re) (progn - (setq cur-indent (+ (current-indentation) a68-indent-step)) + (setq cur-indent (+ (current-indentation) a68-indent-level)) (setq not-indented nil)) (when (bobp) ; Check for rule 5 (setq not-indented nil))))))))