Permalink
Browse files

use mark-active instead of region-active-p

  • Loading branch information...
1 parent 91c2d4b commit e9cc84aff761a2ebd17dc83efb32745c1827a16e @brianc brianc committed Apr 22, 2011
Showing with 2 additions and 3 deletions.
  1. +2 −3 sws-mode.el
View
5 sws-mode.el
@@ -39,7 +39,7 @@
(defun sws-indent-line ()
"Indents current line"
(interactive)
- (if (region-active-p)
+ (if mark-active
(sws-indent-region)
(if (sws-at-bot-p)
(sws-do-indent-line)
@@ -94,7 +94,7 @@
(defun sws-dendent-line ()
"De-indents current line"
(interactive)
- (if (region-active-p)
+ (if mark-active
(sws-move-region (region-beginning) (region-end) '-)
(if (sws-at-bol-p)
(progn
@@ -128,7 +128,6 @@
;; keymap
(use-local-map sws-mode-map)
- (whitespace-mode)
(setq major-mode 'sws-mode))
(provide 'sws-mode)

0 comments on commit e9cc84a

Please sign in to comment.