Permalink
Browse files

Replace region handy func.

  • Loading branch information...
1 parent d3b8d49 commit 192098e1fdcd90716264cd183bd9b0c0cb6f85c6 @chrisdone chrisdone committed Jul 4, 2012
Showing with 5 additions and 0 deletions.
  1. +5 −0 haskell-show.el
View
@@ -28,6 +28,11 @@
(defvar sexp-show "sexp-show")
(require 'haskell-string)
+(defun haskell-show-replace-region ()
+ "Replace the given region with a pretty printed version."
+ (interactive)
+ (haskell-show-replace (region-beginning) (region-end)))
+
;;;###autoload
(defun haskell-show-replace (start end)
"Replace the given region containing a Show value with a pretty

0 comments on commit 192098e

Please sign in to comment.