From 0007e77a2fb76d05662c1fc1c87e48ad8bdaf679 Mon Sep 17 00:00:00 2001 From: Aleksey Uimanov Date: Sat, 4 Apr 2015 22:34:52 +0500 Subject: [PATCH] add (+ tab-width) indentation proposals --- haskell-indentation.el | 9 +++++---- 1 file changed, 5 insertions(+), 4 deletions(-) diff --git a/haskell-indentation.el b/haskell-indentation.el index 31051cef7..5f5134f45 100644 --- a/haskell-indentation.el +++ b/haskell-indentation.el @@ -1102,10 +1102,11 @@ the current buffer." (+ left-indent haskell-indentation-left-offset))) (defun haskell-indentation-push-indentation (indent) - (when (or (null possible-indentations) - (< indent (car possible-indentations))) - (setq possible-indentations - (cons indent possible-indentations)))) + (loop for ind in (list (+ indent tab-width) indent) do + (when (or (null possible-indentations) + (< ind (car possible-indentations))) + (setq possible-indentations + (cons ind possible-indentations))))) (defun haskell-indentation-token-test () (let ((current-token nil)