diff --git a/dotfiles/emacs.d/init.el b/dotfiles/emacs.d/init.el index 21ffa84..6e57135 100644 --- a/dotfiles/emacs.d/init.el +++ b/dotfiles/emacs.d/init.el @@ -95,15 +95,20 @@ ;; Load private file ;;-------------------------------------------------------------------------------------- -(when (file-exists-p "~/.private.el") +(if (file-exists-p "~/.private.el") (load-file "~/.private.el") + (setq irc-servers nil + irc-username nil + irc-password nil + default-realname nil + ) ) ;;-------------------------------------------------------------------------------------- ;; Configure Circe ;;-------------------------------------------------------------------------------------- -(setq circe-network-options 'irc-servers) +(setq circe-network-options irc-servers) (setq circe-use-cycle-completion t) (setq helm-mode-no-completion-in-region-in-modes '(circe-channel-mode @@ -113,7 +118,7 @@ ) (setq circe-reduce-lurker-spam t) -(circe-set-display-handler "JOIN" (lambda (&rest ignored) nil)) ;; Hide JOIN spam +;; (circe-set-display-handler "JOIN" (lambda (&rest ignored) nil)) ;; Hide JOIN spam (add-hook 'circe-chat-mode-hook 'my-circe-prompt) (defun my-circe-prompt () diff --git a/dotfiles/emacs.d/package.el b/dotfiles/emacs.d/package.el index c535023..d70d914 100644 --- a/dotfiles/emacs.d/package.el +++ b/dotfiles/emacs.d/package.el @@ -4,7 +4,7 @@ fill-column-indicator flycheck-clojure flycheck-haskell flycheck-rust flycheck-pos-tip gitignore-mode haskell-mode helm helm-ag helm-projectile js2-mode less-css-mode magit neotree paredit scss-mode powerline projectile - rust-mode color-theme-solarized wrap-region rainbow-delimiters) + rust-mode color-theme-solarized wrap-region stylus-mode rainbow-delimiters) "Packages to make sure are installed") (defun my-packages-installed-p () diff --git a/dotfiles/emacs.d/sample-private.el b/dotfiles/emacs.d/sample-private.el index 15e16c8..04308cc 100644 --- a/dotfiles/emacs.d/sample-private.el +++ b/dotfiles/emacs.d/sample-private.el @@ -8,22 +8,22 @@ ;; Circe Configuration -(defvar irc-username "") -(defvar irc-password "") - (defvar irc-servers '( ( "Freenode" :nick "Your nick" + :host "ircserver.whatever.com" :channels ("channel1" "channel2") - :nickserv-password irc-password :port port - :tls t + :realname "Your name" + :use-tls t + :nickserv-nick "auth nick" + :nickserv-password "auth password" ) ) ) -(defvar default-real-name "Real Name") + ;; Email Configuration