commit cd2cf39cb97674d8e0b7fcec10c1258a36aa812e
from: Omar Polo <op@omarpolo.com>
date: Sun Nov 07 09:08:20 2021 UTC

simplify a68-electric-terminate-line

commit - acfd6899bd70e47f2a25e22df07c2e217b227014
commit + cd2cf39cb97674d8e0b7fcec10c1258a36aa812e
blob - 39daa6af5aff25a616a6a2f6af97d07f35c30941
blob + 6ed07093f9479ab19fbaebd76149e7d61a947843
--- algol-mode.el
+++ algol-mode.el
@@ -188,11 +188,10 @@
     (when (looking-at a68-autoindent-lines-re)
       (a68-indent-line)))
   (delete-horizontal-space) ; Removes triling whitespaces
+  (newline)
   ;; Indent next line if we are not in a string
-  (let ((in-string (a68-within-string)))
-    (newline)
-    (unless in-string
-      (a68-indent-line))))
+  (unless (a68-within-string)
+    (a68-indent-line)))
 
 (defun a68-electric-tab ()
   "Function called when TAB is pressed in Algol68 mode."