aboutsummaryrefslogtreecommitdiff
path: root/src
diff options
context:
space:
mode:
authorfiddlosopher <fiddlosopher@788f1e2b-df1e-0410-8736-df70ead52e1b>2010-02-06 18:55:28 +0000
committerfiddlosopher <fiddlosopher@788f1e2b-df1e-0410-8736-df70ead52e1b>2010-02-06 18:55:28 +0000
commit997ea5ea1d02e31bb8a9b03e3db26684cc81ac59 (patch)
tree3b3acec558fa601b2501bdd0394bb7e067a45ef6 /src
parent645d5d48b9f94bfb437bedba48f2ac167ee8ade7 (diff)
downloadpandoc-997ea5ea1d02e31bb8a9b03e3db26684cc81ac59.tar.gz
Removed html2markdown and hsmarkdown.
html2markdown is no longer needed, since you can pass URI arguments to pandoc and directly convert web pages. (Note, however, that pandoc assumes the pages are UTF8. html2markdown made an attempt to guess the encoding and convert them.) hsmarkdown is pointless -- a large executable that could be replaced by 'pandoc --strict'. git-svn-id: https://pandoc.googlecode.com/svn/trunk@1834 788f1e2b-df1e-0410-8736-df70ead52e1b
Diffstat (limited to 'src')
-rw-r--r--src/hsmarkdown.hs47
1 files changed, 0 insertions, 47 deletions
diff --git a/src/hsmarkdown.hs b/src/hsmarkdown.hs
deleted file mode 100644
index 3f689d4ec..000000000
--- a/src/hsmarkdown.hs
+++ /dev/null
@@ -1,47 +0,0 @@
-{-
-Copyright (C) 2006-8 John MacFarlane <jgm@berkeley.edu>
-
-This program is free software; you can redistribute it and/or modify
-it under the terms of the GNU General Public License as published by
-the Free Software Foundation; either version 2 of the License, or
-(at your option) any later version.
-
-This program is distributed in the hope that it will be useful,
-but WITHOUT ANY WARRANTY; without even the implied warranty of
-MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
-GNU General Public License for more details.
-
-You should have received a copy of the GNU General Public License
-along with this program; if not, write to the Free Software
-Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
--}
-
-{- |
- Copyright : Copyright (C) 2009 John MacFarlane
- License : GNU GPL, version 2 or above
-
- Maintainer : John MacFarlane <jgm@berkeley@edu>
- Stability : alpha
- Portability : portable
-
-Wrapper around pandoc that emulates Markdown.pl as closely as possible.
--}
-module Main where
-import System.Process
-import System.Environment ( getArgs )
--- Note: ghc >= 6.12 (base >=4.2) supports unicode through iconv
--- So we use System.IO.UTF8 only if we have an earlier version
-#if MIN_VERSION_base(4,2,0)
-#else
-import Prelude hiding ( putStr, putStrLn, writeFile, readFile, getContents )
-import System.IO.UTF8
-#endif
-import Control.Monad (forM_)
-
-main :: IO ()
-main = do
- files <- getArgs
- let runPandoc inp = readProcess "pandoc" ["--from", "markdown", "--to", "html", "--strict"] inp >>= putStrLn
- if null files
- then getContents >>= runPandoc
- else forM_ files $ \f -> readFile f >>= runPandoc