--- a/.emacs-my Tue Jun 23 11:35:08 2009 +0300
+++ b/.emacs-my Tue Jun 23 11:52:56 2009 +0300
@@ -366,7 +366,11 @@
;; ----------------------------------------------------------------------
;; browser
-(setq browse-url-browser-function (quote browse-url-mozilla))
+(cond
+ ((equal window-system 'w32)
+ (setq browse-url-browser-function 'browse-url-default-windows-browser))
+ (t
+ (setq browse-url-browser-function 'browse-url-mozilla)))
;; ======================================================================
;; TIME SETTING
@@ -561,8 +565,9 @@
(require 'info)
(if (equal window-system 'w32)
(progn
- (setq Info-directory-list (list (expand-file-name "~/../bin/emacs/info")))
- (add-to-list 'Info-directory-list (expand-file-name "~/../bin/MinGW/info") t) ; t - append to the end
+ ;; TODO Write which func to find runemacs.exe dir.
+ ;; (setq Info-directory-list (list (expand-file-name "~/../bin/emacs/info")))
+ ;; (add-to-list 'Info-directory-list (expand-file-name "~/../bin/MinGW/info") t) ; t - append to the end
))
;; ======================================================================
@@ -715,6 +720,17 @@
)
+;; ----------------------------------------------------------------------
+;; rcirc
+
+;; Turn on logging everything to a special buffer, for debugging.
+;; (setq rcirc-debug-flag t)
+
+(add-hook 'rcirc-mode-hook (lambda () (rcirc-track-minor-mode 1)))
+(setq rcirc-time-format "%H:%M ")
+(defun rcirc-handler-301 (process cmd sender args)
+ "/away message handler.")
+
;; ======================================================================
;; VCS, version control, cvs, svn.