diff --git a/texttools.tcl b/texttools.tcl
index a5dd028..2c124e2 100755
--- a/texttools.tcl
+++ b/texttools.tcl
@@ -24,7 +24,7 @@ proc dedent {text} {
 }
 
 proc markdown_quote {text} {
-  set text [string trimright $text]
+  set text [string trim $text]
   return [string cat "> " [regsub -all \n $text "\n> "]]
 }