Import hs-plugins cvs
This commit is contained in:
11
examples/conf/simple/Mailrc.conf
Normal file
11
examples/conf/simple/Mailrc.conf
Normal file
@ -0,0 +1,11 @@
|
||||
import System.Directory
|
||||
|
||||
resource = mail {
|
||||
-- editor = do b <- doesFileExist "/usr/bin/emacs"
|
||||
-- return $ if b then "emacs" else "vi" ,
|
||||
editor = do b <- doesFileExist "/bin/sh"
|
||||
return "sh",
|
||||
|
||||
attribution = \name -> "Today, "++name++" wrote :"
|
||||
}
|
||||
|
Reference in New Issue
Block a user