branch: elpa/jade-mode
commit 684a5c0fba5539f3bf5ea3d93ddaae42eaac5712
Author: Brian Carlson <[email protected]>
Commit: Brian Carlson <[email protected]>
require whitespace-mode
---
sws-mode.el | 4 +++-
1 file changed, 3 insertions(+), 1 deletion(-)
diff --git a/sws-mode.el b/sws-mode.el
index 507ca2c988..aadd3e15ce 100644
--- a/sws-mode.el
+++ b/sws-mode.el
@@ -49,6 +49,7 @@
(defun sws-at-bol-p ()
"If point is at beginning of line"
+ (interactive)
(= (point) (point-at-bol)))
(defun sws-at-bot-p ()
@@ -98,6 +99,7 @@
(sws-move-region (region-beginning) (region-end) '-)
(if (sws-at-bol-p)
(progn
+ (message "at mother fucking bol")
(delete-horizontal-space)
(indent-to (sws-max-indent)))
(let ((ci (current-indentation)))
@@ -127,7 +129,7 @@
;; keymap
(use-local-map sws-mode-map)
-
+ (whitespace-mode)
(setq major-mode 'sws-mode))
(provide 'sws-mode)
