diff --git a/MPS/Snippets.hs b/MPS/Snippets.hs
--- a/MPS/Snippets.hs
+++ b/MPS/Snippets.hs
@@ -221,7 +221,7 @@
 gsub     = gsubRegexPR
 match    = matchRegexPR
 
-strip s  = s.gsub "^\\s*" "" .gsub "\\s*$" ""
+strip s  = s.sub "^\\s*" "" .reverse .sub "^\\s*" "" .reverse
 empty s  = case s.match("\\S") of
   Just _ -> False
   Nothing -> True
diff --git a/changelog.markdown b/changelog.markdown
--- a/changelog.markdown
+++ b/changelog.markdown
@@ -1,3 +1,8 @@
+2008.10.15
+----------
+
+* Fix (use sub, as regexpr works per line)
+
 2008.10.14
 ----------
 
diff --git a/mps.cabal b/mps.cabal
--- a/mps.cabal
+++ b/mps.cabal
@@ -1,5 +1,5 @@
 Name:                 mps
-Version:              2008.10.14
+Version:              2008.10.15
 Build-type: 		      Simple
 Synopsis:             message passing style helpers
 Description:          message passing style helpers