1. Jeffrey Stoffers
  2. Dotfiles-Emacs

Commits

Jeffrey Stoffers  committed 6750684

Merge with windows init.el

  • Participants
  • Parent commits dd33b1c
  • Branches master

Comments (0)

Files changed (1)

File .emacs.d/init.el

View file
  • Ignore whitespace
 		      ac-nrepl
 		      auto-complete
 		      color-theme-sanityinc-tomorrow
+		      magit
 		      nrepl
 		      org-plus-contrib
 		      paredit
 ;;; Emacs Configuration
 ;;;---------------------------------------------------------------------
 
-;; Check if running os x windowed
-(defvar macosx-p (string-match "ns" (symbol-name window-system)))
+(when (eq system-type 'windows-nt)
+  (require 'tramp)
+  (setq tramp-default-method "plink")
 
 ;; Turn off all window chrome if not running OS X windowed 
-(unless macosx-p
+(unless (eq system-type 'darwin)
   (menu-bar-mode -1)
   (tool-bar-mode -1))
 (scroll-bar-mode -1)
 (add-hook 'flyspell-mode-hook 'flyspell-buffer)
 
 ;;;---------------------------------------------------------------------
-;;; Nrepl setup
+;;; nrepl setup
 ;;;---------------------------------------------------------------------
 (add-hook 'nrepl-interaction-mode-hook 'nrepl-turn-on-eldoc-mode)
 (add-hook 'nrepl-interaction-mode-hook 'paredit-mode)
 (add-hook 'nrepl-mode-hook 'paredit-mode)
 (add-hook 'nrepl-mode-hook 'rainbow-delimiters-mode)
 
+;;;---------------------------------------------------------------------
+;;; clojure setup
+;;;---------------------------------------------------------------------
+(require 'clojure-mode)
+
+(define-clojure-indent
+  (defroutes 'defun)
+  (GET 2)
+  (POST 2)
+  (PUT 2)
+  (DELETE 2)
+  (HEAD 2)
+  (ANY 2)
+  (context 2))
+
+;;;---------------------------------------------------------------------
+;;; auto-complete setup
+;;;---------------------------------------------------------------------
 (require 'auto-complete-config)
 (ac-config-default)
+
 (require 'ac-nrepl)
 (add-hook 'nrepl-mode-hook 'ac-nrepl-setup)
 (add-hook 'nrepl-interaction-mode-hook 'ac-nrepl-setup)
-(eval-after-load "auto-complete"
-  '(add-to-list 'ac-modes 'nrepl-mode))
+(eval-after-load "auto-complete" '(add-to-list 'ac-modes 'nrepl-mode))
 
 (defun set-auto-complete-as-completion-at-point-function ()
 (setq completion-at-point-functions '(auto-complete)))
    (clojure . t)
    (C . t)
    (sql . t)))
+
+;;;---------------------------------------------------------------------
+;;; erc configuration
+;;;---------------------------------------------------------------------
+(require 'tls)
+(require 'erc)
+
+(setq erc-track-exclude '("#salt" "#offlineimap" "#newsbeuter" "#zerobrane" "#weechat" "#tmux" "#startups" "#emacs" "#twitlive" "#clojure" "#nixos" "#bitlbee" "#5by5" "#debian" "#suckless" "#i3" "#crossover" "#unfiltered" "#ledger" "##hackernews" "#sixgun" "#middleman" "#fubarlabs" "#j4tools" "#bots" "#offtopic" "irc.uberpurple.com:6669" "irc.uberpurple.com:6669<2>" "irc.uberpurple.com:6669<3>" "irc.uberpurple.com:6669<4>" "irc.uberpurple.com:6669<5>" "irc.uberpurple.com:6669<6>" "irc.uberpurple.com:6669<7>"))
+
+;;; M-x start-irc
+(defun start-irc ()
+  "Connect to IRC."
+  (interactive)
+  (erc-tls :server "irc.uberpurple.com" :port 6669
+	   :nick "necronian" :password "necronian/bitlbee:")
+  (erc-tls :server "irc.uberpurple.com" :port 6669
+	   :nick "necronian" :password "necronian/purplenet:")
+  (erc-tls :server "irc.uberpurple.com" :port 6669
+	   :nick "necronian" :password "necronian/freenode:")
+  (erc-tls :server "irc.uberpurple.com" :port 6669
+	   :nick "necronian" :password "necronian/i3:")
+  (erc-tls :server "irc.uberpurple.com" :port 6669
+	   :nick "necronian" :password "necronian/oftc:")
+  (erc-tls :server "irc.uberpurple.com" :port 6669
+	   :nick "necronian" :password "necronian/twit:"))