On Sat, 25 Mar 2006 09:00:57 +0900, shelarcy <[EMAIL PROTECTED]> wrote:
I tried to wrote my web diary by HSXML

(I started web diary before blog boom. Web diary is like blog ... but in
manycase, web diary isn't cgi or web application system, it is wrote plain
html text file. Of cource, many people use generator and web diary based
blog system exist now,)

I attatched yestaday's article that name diary.hs .

Oops, I forgot that.

This file written in Japanese by euc-jp encode.
So if you want to test it,  you must chage HSXML_HTML to use Japanese
text like this;


html_clean str = all good_char str   where
   -- good_char c | not (isAscii c) = False
   good_char c | isSpace c = True
   -- good_char c | not (isPrint c) = False
   good_char c | c `elem` "<>\"&" = False
   good_char _ = True

html_encode_char :: Char -> String
-- html_encode_char c | not (isAscii c) = error $ "non-ascii character"
html_encode_char c | isSpace c = [c]
-- html_encode_char c | not (isPrint c) = error $ "non-printable character"
html_encode_char '<' = "&lt;"
html_encode_char '>' = "&gt;"
html_encode_char '"' = "&quot;"
html_encode_char '&' = "&amp;"
html_encode_char c = [c]


Sorry for I posted this message for Haskell mailing list after that message.

Okay. We will move to Cafe for that. After this mail.

--
shelarcy <shelarcy    capella.freemail.ne.jp>
http://page.freett.com/shelarcy/
_______________________________________________
Haskell mailing list
Haskell@haskell.org
http://www.haskell.org/mailman/listinfo/haskell

Reply via email to