waratuman

λ ghc red.hs 
[1 of 1] Compiling Main             ( red.hs, red.o )

red.hs:8:5:
    Couldn't match expected type `Char' with actual type `[Char]'
    In the pattern: "merge"
    In a case alternative: "merge" -> merge args putStrLn "done"
    In the expression:
      case action of {
        "merge" -> merge args putStrLn "done"

waratuman

<center> 
  <table border="0" cellpadding="0" cellspacing="0" height="100%" width="100%" id="backgroundTable"> 
    <tr> 
      <td align="center" valign="top"> 
        
        <table border="0" cellpadding="0" cellspacing="0" width="600" id="templateContainer"> 
          <tr> 
            <td align="center" valign="top"> 
              <!-- // Begin Template Header \\ --> 

waratuman

;;; misc.el

(when window-system
  (setq frame-title-format '(buffer-file-name "%f" ("%b")))
  (tooltip-mode -1)
  (mouse-wheel-mode t)
  (blink-cursor-mode -1))
 
(add-hook 'before-make-frame-hook 'turn-off-tool-bar)
 

waratuman

;;; init.el