     (color-theme-dark-laptop)))
 
 (global-set-key (kbd "<f9> n") 'toggle-night-color-theme)
+;; ---------------------------------------------------------------------
+
+;; Haskell mode (see http://haskell.org/haskellwiki/Haskell_mode_for_Emacs)
+(autoload 'inferior-haskell-load-file "haskell-site-file")
+(eval-after-load "inf-haskell"
+  '(global-set-key (kbd "<f9> h") 'haskell-hoogle))
+(remove-hook 'haskell-mode-hook 'turn-on-haskell-doc-mode)
+
+;; dictionary-el
+(global-set-key (kbd "<f9> d") 'dictionary-search)
+(eval-after-load "dictionary"
+  '(progn (setq dictionary-server "localhost")
+	  (define-key dictionary-mode-map (kbd "DEL") 'scroll-down)))
+
+;; spell check
+(setq ispell-program-name "aspell")
+(global-set-key (kbd "<f9> ib") 'ispell-buffer)
+(global-set-key (kbd "<f9> ir") 'ispell-region)
+
+;; org
+(eval-after-load "org" '(global-set-key (kbd "<f9> o") 'org-store-link))
 
 ;; ---------------------------------------------------------------------
 ;; miscellaneous settings

;; mail

(global-set-key (kbd "<f12>") 'gnus) ; see also ~/.gnus.el
(global-set-key (kbd "<f9> b") 'bbdb)

;; Don't pop-up *BBDB* buffer when completing.
(setq bbdb-completion-display-record nil)

(global-set-key (kbd "<f9> s") 'delete-trailing-whitespace)

(setq default-indicate-empty-lines t require-final-newline t)

;; ---------------------------------------------------------------------
;; color-theme

;; `color-theme.el' bug workaround [XXX Is it still needed?]
(eval-after-load "color-theme"
