Merge pull request #1705 from SequentialDesign/change-verbose-style-i…

…n-compute-line fix verbose style in `compute-line`
lem-project · Dec 10, 2024 · fdd9ec8 · fdd9ec8
2 parents d8dca87 + 5398170
commit fdd9ec8
Showing 1 changed file with 1 addition and 3 deletions.
diff --git a/src/ext/line-numbers.lisp b/src/ext/line-numbers.lisp
@@ -60,9 +60,7 @@ With a positive universal argument, use relative line numbers. Also obey the glo
             (line (line-number-at-point point))
             (custom-line (variable-value 'custom-current-line :default buffer)))
         (if (= cursor-line line)
-            (if custom-line
-                custom-line
-                line)
+            (or custom-line line)
             (abs (- cursor-line line))))
       (line-number-at-point point)))