;; IRC reconnect
(eval-after-load 'rcirc
  '(defun-rcirc-command reconnect (arg)
	 "Reconnect the server process."
	 (interactive "i")
	 (unless process
	   (error "There's no process for this target"))
	 (let* ((server (car (process-contact process)))
		(port (process-contact process :service))
		(nick (rcirc-nick process))
		channels query-buffers)
	   (dolist (buf (buffer-list))
	 (with-current-buffer buf
	   (when (eq process (rcirc-buffer-process))
		 (remove-hook 'change-major-mode-hook
			  'rcirc-change-major-mode-hook)
		 (if (rcirc-channel-p rcirc-target)
		 (setq channels (cons rcirc-target channels))
		   (setq query-buffers (cons buf query-buffers))))))
	   (delete-process process)
	   (rcirc-connect server port nick
			  rcirc-default-user-name
			  rcirc-default-full-name
			  channels))))

;; Shortcut to connect to IRC
(defun irc ()
  "Connect to IRC"
  (interactive)
  (circe "Freenode"))

;; Enable chanop commands
(eval-after-load 'circe '(require 'circe-chanop))

;; IRC reconnect
(eval-after-load 'rcirc
  '(defun-rcirc-command reconnect (arg)
	 "Reconnect the server process."
	 (interactive "i")
	 (unless process
	   (error "There's no process for this target"))
	 (let* ((server (car (process-contact process)))
		(port (process-contact process :service))
		(nick (rcirc-nick process))
		channels query-buffers)
	   (dolist (buf (buffer-list))
	 (with-current-buffer buf
	   (when (eq process (rcirc-buffer-process))
		 (remove-hook 'change-major-mode-hook
			  'rcirc-change-major-mode-hook)
		 (if (rcirc-channel-p rcirc-target)
		 (setq channels (cons rcirc-target channels))
		   (setq query-buffers (cons buf query-buffers))))))
	   (delete-process process)
	   (rcirc-connect server port nick
			  rcirc-default-user-name
			  rcirc-default-full-name
			  channels))))

;; Shortcut to connect to IRC
(defun irc ()
  "Connect to IRC"
  (interactive)
  (circe "Freenode"))

;; Enable chanop commands
(eval-after-load 'circe '(require 'circe-chanop))

;; Circe (IRC) configuration
;; Put your configuration in a ~/.private.el file with permissions 0600
(load-file "~/.private.el")
(setq circe-network-options
	  `(("Freenode"
		 :nick ,freenode-user
		 :channels ("#mlug-au")
		 :nickserv-password ,freenode-password
		 )))

Add more to irc config
Add more to irc config

map7/emacs-config,map7/emacs-config,map7/emacs-config