source: projects/vskel/branches/vskel-20110223/.liece/init.el @ 1126

;;; -*- mode: emacs-lisp -*- -*- coding: iso-2022-jp -*-

;; IRC Servers
(setq liece-server "irc.kyoto.wide.ad.jp")
;(setq liece-server "irc.rcac.tdi.co.jp")    
;(setq liece-server "irc.race.u-tokyo.ac.jp")
;(setq liece-server "irc.huie.hokudai.ac.jp")
;(setq liece-server "irc.karrn.ad.jp")
;(setq liece-server "irc.tohoku.ac.jp")
;(setq liece-server "irc.dti.ne.jp")    
;(setq liece-server "irc.tokyo.wide.ad.jp")

;; Port number of IRC Servers (default: 6667)
;(setq liece-service 6667)

;; Private information of user.
;(setq liece-name "")
(setq liece-nickname "VineUser")

;; Customization to change Look & Feel.
;; If non-nil, channel buffer would be displayed.
(setq liece-channel-buffer-mode t)
;; If non-nil, nick buffer would be displayed.
(setq liece-nick-buffer-mode t)
;; If non-nil, channel list buffer would be displayed.
(setq liece-channel-list-buffer-mode t)

;; Window splitting parameters.
(setq liece-nick-window-width-percent 18)
(setq liece-channel-list-window-width-percent 24)

(setq liece-buffer-max-size 100000)

;; Path settings
;; If you have installed as XEmacs package please set them to nil.
(setq liece-intl-catalogue-directory "/usr/share/liece/po")
(setq liece-window-style-directory "/usr/share/liece/styles")

(setq liece-window-default-style "middle")

;; Highlighten IRC buffers.
(setq liece-highlight-mode t)
;; If `liece-highlight-mode' is non-nil, strings which matches 
;; following regular expression would be emphasized by colouring.
;(setq liece-highlight-pattern 
;      (regexp-opt 
;       '("foo" "bar" "baz.*")))

;; Channels we want to join startup time.
;(setq liece-startup-channel-list
;      '("#foo" "#bar"))
;; Channel bindings to its numerical expression.
;; Each element of list are bound to n-th.
;(setq liece-default-channel-binding 
;      '("#foo" nil "#baz" "#bar"))

;; DCC external programs.
;; When this is not specified, we search `dcc' executable in exec-path.
(setq liece-dcc-program             
      (expand-file-name "@DCCPATH@"))
;; Don't receive any files automatically.
(setq liece-dcc-receive-direct nil) 

;;; XEmacs specific features
;; Normal position of toolbar icons.
(setq liece-icon-directory          
      (expand-file-name "@ICONDIR@"))
;; Default toolbar position.
;(setq liece-toolbar-position 'top) 
;; Display smiley mark.
;(setq liece-use-smiley t)          

;;; URL browsing.
;; Specify browser name. To see available browser names, 
;; refer docstring of `liece-url-browser-function'.
(setq liece-url-browser-name "mozilla") 

;;; Encryption
(setq liece-crypt-known-keys '("foo" "bar"))
;(setq liece-crypt-default-keys '(("#hoge" . "fuga")))

;;; Automatic invisible.
;(add-hook 'liece-after-001-hook
;                 (function (lambda (prefix rest)
;                     (liece-send
;                      "MODE %s +i" liece-real-nickname)
;                     nil)))

;;; Converting codings.
;; Detect coding automatically.
;(setq liece-detect-coding-system t)
;; Convert deprecated hankaku kana to zenkaku kana.
;(setq liece-convert-hankaku-katakana t)

;; Saved Settings
;; End of Saved Settings