 ;; use aspell instead of ispell:
 (setq-default ispell-program-name "aspell")  ;; or just symlink ispell to aspell...
 ;; prevent spell check in code chunks:
-;; does not work... dammit
-;(add-to-list 'ispell-skip-region-alist '("^#+BEGIN" . "^#+END_SRC"))
-;(add-to-list 'ispell-skip-region-alist '("^<<.*>>=" . "^@"))
-;(add-to-list 'ispell-skip-region-alist '("Sexpr{" . "} "))
-;(add-to-list 'ispell-skip-region-alist '("^#\s" "$"))
-;(add-to-list 'ispell-skip-region-alist '("=" "="))
-;; skip code chunks in flyspell
-;(defun flyspell-eligible ()
-;  (let ((p (point)))
-;      (save-excursion
-;        (cond ((re-search-backward (ispell-begin-skip-region-regexp) nil t)
-;        	(ispell-skip-region (match-string-no-properties 0))
-;                (< (point) p))
-;                (t)))))
-;;
 ; enable spell checking using flyspell for Tex, latex and org-mode,
 ; disable for ess.
 (add-hook 'TeX-mode-hook

      (if (eq ess-ask-for-ess-directory nil)
            (setq ess-ask-for-ess-directory t)
                (setq ess-ask-for-ess-directory nil)))
;; This will set Ctrl-g to toggle but you can set it to anything
;; you want.
;; (global-set-key [(control meta g)] 'toggle-ask-R)
;; Automagically delete trailing whitespace when saving R script
;; files. One can add other commands in the ess-mode-hook below.
;; (add-hook 'ess-mode-hook
;;       '(lambda()
;; 	(add-hook 'write-file-functions
;; 	(lambda ()
;; 	(ess-nuke-trailing-whitespace)))
;; 	(setq ess-nuke-trailing-whitespace-p t)))
;; disable the replacing of undescore with assignment
(ess-toggle-underscore nil)
;;

;; just comment it out by adding a semicolon to the start of the line.
;; You may delete these explanatory comments.
(package-initialize)

;;; * Font
;;;;;;;;;;;;;;;;;;;;;;;;;;
