commit - acfd6899bd70e47f2a25e22df07c2e217b227014
commit + cd2cf39cb97674d8e0b7fcec10c1258a36aa812e
blob - 39daa6af5aff25a616a6a2f6af97d07f35c30941
blob + 6ed07093f9479ab19fbaebd76149e7d61a947843
--- algol-mode.el
+++ algol-mode.el
(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."