Emacs Init File

init.el

(custom-set-variables
 ;; custom-set-variables was added by Custom.
 ;; If you edit it by hand, you could mess it up, so be careful.
 ;; Your init file should contain only one such instance.
 ;; If there is more than one, they won't work right.
 '(TeX-PDF-mode t)
 '(TeX-engine (quote xetex))
 '(calendar-holidays nil)
 '(column-number-mode t)
 '(epg-gpg-program "C:/Program Files (x86)/GNU/GnuPG/gpg2.exe")
 '(flyspell-default-dictionary "francais")
 '(global-linum-mode t)
 '(inhibit-startup-screen t)
 '(linum-format " %d ")
 '(org-agenda-files (quote ("C:/Users/gp/org")))
 '(org-capture-templates (quote (("j" "Journal" entry (file+datetree "C:/Users/gp/org/journal.org") "* %U " :kill-buffer :unnarrowed))))
 '(org-log-done t)
 '(org-todo-keyword-faces (quote (("TODO" :foreground "yellow" :background "red" :bold t :weight bold) ("WAIT" :foreground "red" :bold t :weight bold) ("DONE" :foreground "green") ("CANCELED" :foreground "gray"))))
 '(org-todo-keywords (quote ((sequence "TODO(t@)" "WAIT(w@/!)" "|" "DONE(d@)" "CANCELED(c@)"))))
 '(scroll-step 1)
 '(tool-bar-mode nil))
(custom-set-faces
 ;; custom-set-faces was added by Custom.
 ;; If you edit it by hand, you could mess it up, so be careful.
 ;; Your init file should contain only one such instance.
 ;; If there is more than one, they won't work right.
 )

(server-start)
(prefer-coding-system 'utf-8)
(global-unset-key (kbd "C-z"))

;; PowerShell mode
(add-to-list 'load-path "~/.emacs.d/lisp/")
(autoload 'powershell-mode "powershell-mode" nil t)
(add-to-list 'auto-mode-alist '("\\.ps1$" . powershell-mode))

;; recent files
(require 'recentf)
(recentf-mode 1)

(global-set-key "\C-x\ \C-r" 'recentf-open-files)

;; calfw
(add-to-list 'load-path "~/.emacs.d/lisp/calfw/")
(autoload 'cfw:open-calendar-buffer "calfw" nil t)
(autoload 'cfw:ical-create-source "calfw-ical" nil t)
(autoload 'cfw:org-create-source "calfw-org" nil t)

(defun my-open-calendar()
  (interactive)
  (cfw:open-calendar-buffer
   :contents-sources
   (list
    (cfw:ical-create-source "AL2" "~/calendars/3814.ics" "#f80000")
    (cfw:ical-create-source "AN3" "~/calendars/3818.ics" "#ff9966")
    (cfw:ical-create-source "ME3" "~/calendars/3849.ics" "#9933ff")
    (cfw:ical-create-source "MF2" "~/calendars/3874.ics" "#fad165")
    (cfw:ical-create-source "VAR" "~/calendars/3888.ics" "#ff00cc")
    (cfw:org-create-source "Green")
    )))
(global-set-key "\C-cc" 'my-open-calendar)

;; org-mode
(global-set-key "\C-ca" 'org-agenda)
(global-set-key "\C-cj" (lambda () (interactive) (org-capture nil "j")))
(add-hook 'org-mode-hook 'auto-fill-mode)

;; GNU Aspell for Windows.
(add-to-list 'exec-path "C:/Program Files (x86)/Aspell/bin/")

;; LaTeX mode hooks
(add-hook 'LaTeX-mode-hook (lambda() 
			     (auto-fill-mode 1)
			     (LaTeX-math-mode 1)))