branch: externals/a68-mode
commit cd2cf39cb97674d8e0b7fcec10c1258a36aa812e
Author: Omar Polo <[email protected]>
Commit: Omar Polo <[email protected]>
simplify a68-electric-terminate-line
---
algol-mode.el | 7 +++----
1 file changed, 3 insertions(+), 4 deletions(-)
diff --git a/algol-mode.el b/algol-mode.el
index 39daa6af5a..6ed07093f9 100644
--- a/algol-mode.el
+++ b/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."
