From a8bbd950e526abb69262fb7186ced583885c6ac8 Mon Sep 17 00:00:00 2001
From: fiddlosopher <fiddlosopher@788f1e2b-df1e-0410-8736-df70ead52e1b>
Date: Mon, 18 Dec 2006 22:02:39 +0000
Subject: Changed '--smartypants' to '--smart' and adjusted documentation and
 symbols accordingly.

git-svn-id: https://pandoc.googlecode.com/svn/trunk@224 788f1e2b-df1e-0410-8736-df70ead52e1b
---
 src/Text/Pandoc/Writers/HTML.hs | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

(limited to 'src/Text/Pandoc/Writers/HTML.hs')

diff --git a/src/Text/Pandoc/Writers/HTML.hs b/src/Text/Pandoc/Writers/HTML.hs
index 1f1258753..d99b70bee 100644
--- a/src/Text/Pandoc/Writers/HTML.hs
+++ b/src/Text/Pandoc/Writers/HTML.hs
@@ -51,7 +51,7 @@ obfuscateChar char = let num = ord char in
 stringToHtml :: String -> String
 stringToHtml str = escapePreservingRegex stringToHtmlString (mkRegex "\"|(&[[:alnum:]]*;)") str
 
--- | Escape string as in 'stringToHtml' but add smartypants filter.
+-- | Escape string as in 'stringToHtml' but add smart typography filter.
 stringToSmartHtml :: String -> String
 stringToSmartHtml = 
     let escapeDoubleQuotes = 
@@ -157,7 +157,7 @@ listItemToHtml options list = "<li>" ++ (concatMap (blockToHtml options) list) +
 inlineListToHtml :: WriterOptions -> [Inline] -> String
 inlineListToHtml options lst = 
     -- consolidate adjacent Str and Space elements for more intelligent 
-    -- smartypants filtering
+    -- smart typography filtering
     let lst' = consolidateList lst in
     concatMap (inlineToHtml options) lst'
 
@@ -166,7 +166,7 @@ inlineToHtml :: WriterOptions -> Inline -> String
 inlineToHtml options (Emph lst) = "<em>" ++ (inlineListToHtml options lst) ++ "</em>"
 inlineToHtml options (Strong lst) = "<strong>" ++ (inlineListToHtml options lst) ++ "</strong>"
 inlineToHtml options (Code str) = "<code>" ++ (codeStringToHtml str) ++ "</code>"
-inlineToHtml options (Str str) = if (writerSmartypants options) then 
+inlineToHtml options (Str str) = if (writerSmart options) then 
                                      stringToSmartHtml str 
                                  else 
                                      stringToHtml str
-- 
cgit v1.2.3