 (autoload 'ghc-init "ghc" nil t)
 (add-hook 'haskell-mode-hook (lambda () (ghc-init)))
 
-;;; Python mode
-(defvar ac-source-pysmell
-  '((candidates
-     . (lambda ()
-         (require 'pysmell)
-         (pysmell-get-completions))))
-  "Source for PySmell")
-(add-hook 'python-mode-hook 
-          (lambda () (local-set-key (kbd "RET") 'newline-and-indent)))
-(add-hook 'python-mode-hook 
-          (lambda () (local-set-key (kbd "C-m") 'newline-and-indent)))
-(add-hook 'python-mode-hook
-          '(lambda ()
-             (set (make-local-variable 'ac-sources)
-                  (append ac-sources '(ac-source-pysmell)))))
-
 ;;; py-autopep8
 (require 'py-autopep8)
 (add-hook 'before-save-hook 'py-autopep8-before-save)
 
 ;;; js3 mode
 (add-hook 'js3-mode-hook
-          (lambda () 
+          (lambda ()
             (setq js3-auto-indent-p t)
             (setq js3-curly-indent-offset 0)
             (setq js3-enter-indents-newline t)


;; Packages
(require 'package)
(setq package-archives 
      (append '(("marmalade" . "http://marmalade-repo.org/packages/")
                ("melpa" . "http://melpa.milkbox.net/packages/"))
              package-archives))

     (color-theme-euphoria)))

;;; Screen size specific configuration
(setq initial-frame-alist
      (append '((width . 85)
		(height . 50)) initial-frame-alist))

;;; Template
(require 'autoinsert)
(setq auto-insert-directory "~/.emacs.d/template")
(setq auto-insert-alist
      (append '(("\\.cpp$" . ["template.cpp" my-template])
                ("\\.h$" . ["template.h" my-template]))))
(defvar template-replacements-alists
  '(("%file%" . (lambda () (file-name-nondirectory (buffer-file-name))))
    ("%file-noext%" .
     (lambda () (file-name-sans-extension (file-name-nondirectory (buffer-file-name)))))
    ("%include-guard%" .
     (lambda () (format "%s_H_" (upcase (file-name-sans-extension (file-name-nondirectory buffer-file-name))))))))
(defun my-template ()
  (time-stamp)
