[1126] | 1 | ;;; -*- mode: emacs-lisp -*- -*- coding: iso-2022-jp -*- |
---|
| 2 | |
---|
| 3 | ;; IRC Servers |
---|
| 4 | (setq liece-server "irc.kyoto.wide.ad.jp") |
---|
| 5 | ;(setq liece-server "irc.rcac.tdi.co.jp") |
---|
| 6 | ;(setq liece-server "irc.race.u-tokyo.ac.jp") |
---|
| 7 | ;(setq liece-server "irc.huie.hokudai.ac.jp") |
---|
| 8 | ;(setq liece-server "irc.karrn.ad.jp") |
---|
| 9 | ;(setq liece-server "irc.tohoku.ac.jp") |
---|
| 10 | ;(setq liece-server "irc.dti.ne.jp") |
---|
| 11 | ;(setq liece-server "irc.tokyo.wide.ad.jp") |
---|
| 12 | |
---|
| 13 | ;; Port number of IRC Servers (default: 6667) |
---|
| 14 | ;(setq liece-service 6667) |
---|
| 15 | |
---|
| 16 | ;; Private information of user. |
---|
| 17 | ;(setq liece-name "") |
---|
| 18 | (setq liece-nickname "VineUser") |
---|
| 19 | |
---|
| 20 | ;; Customization to change Look & Feel. |
---|
| 21 | ;; If non-nil, channel buffer would be displayed. |
---|
| 22 | (setq liece-channel-buffer-mode t) |
---|
| 23 | ;; If non-nil, nick buffer would be displayed. |
---|
| 24 | (setq liece-nick-buffer-mode t) |
---|
| 25 | ;; If non-nil, channel list buffer would be displayed. |
---|
| 26 | (setq liece-channel-list-buffer-mode t) |
---|
| 27 | |
---|
| 28 | ;; Window splitting parameters. |
---|
| 29 | (setq liece-nick-window-width-percent 18) |
---|
| 30 | (setq liece-channel-list-window-width-percent 24) |
---|
| 31 | |
---|
| 32 | (setq liece-buffer-max-size 100000) |
---|
| 33 | |
---|
| 34 | ;; Path settings |
---|
| 35 | ;; If you have installed as XEmacs package please set them to nil. |
---|
| 36 | (setq liece-intl-catalogue-directory "/usr/share/liece/po") |
---|
| 37 | (setq liece-window-style-directory "/usr/share/liece/styles") |
---|
| 38 | |
---|
| 39 | (setq liece-window-default-style "middle") |
---|
| 40 | |
---|
| 41 | ;; Highlighten IRC buffers. |
---|
| 42 | (setq liece-highlight-mode t) |
---|
| 43 | ;; If `liece-highlight-mode' is non-nil, strings which matches |
---|
| 44 | ;; following regular expression would be emphasized by colouring. |
---|
| 45 | ;(setq liece-highlight-pattern |
---|
| 46 | ; (regexp-opt |
---|
| 47 | ; '("foo" "bar" "baz.*"))) |
---|
| 48 | |
---|
| 49 | ;; Channels we want to join startup time. |
---|
| 50 | ;(setq liece-startup-channel-list |
---|
| 51 | ; '("#foo" "#bar")) |
---|
| 52 | ;; Channel bindings to its numerical expression. |
---|
| 53 | ;; Each element of list are bound to n-th. |
---|
| 54 | ;(setq liece-default-channel-binding |
---|
| 55 | ; '("#foo" nil "#baz" "#bar")) |
---|
| 56 | |
---|
| 57 | ;; DCC external programs. |
---|
| 58 | ;; When this is not specified, we search `dcc' executable in exec-path. |
---|
| 59 | (setq liece-dcc-program |
---|
| 60 | (expand-file-name "@DCCPATH@")) |
---|
| 61 | ;; Don't receive any files automatically. |
---|
| 62 | (setq liece-dcc-receive-direct nil) |
---|
| 63 | |
---|
| 64 | ;;; XEmacs specific features |
---|
| 65 | ;; Normal position of toolbar icons. |
---|
| 66 | (setq liece-icon-directory |
---|
| 67 | (expand-file-name "@ICONDIR@")) |
---|
| 68 | ;; Default toolbar position. |
---|
| 69 | ;(setq liece-toolbar-position 'top) |
---|
| 70 | ;; Display smiley mark. |
---|
| 71 | ;(setq liece-use-smiley t) |
---|
| 72 | |
---|
| 73 | ;;; URL browsing. |
---|
| 74 | ;; Specify browser name. To see available browser names, |
---|
| 75 | ;; refer docstring of `liece-url-browser-function'. |
---|
| 76 | (setq liece-url-browser-name "mozilla") |
---|
| 77 | |
---|
| 78 | ;;; Encryption |
---|
| 79 | (setq liece-crypt-known-keys '("foo" "bar")) |
---|
| 80 | ;(setq liece-crypt-default-keys '(("#hoge" . "fuga"))) |
---|
| 81 | |
---|
| 82 | ;;; Automatic invisible. |
---|
| 83 | ;(add-hook 'liece-after-001-hook |
---|
| 84 | ; (function (lambda (prefix rest) |
---|
| 85 | ; (liece-send |
---|
| 86 | ; "MODE %s +i" liece-real-nickname) |
---|
| 87 | ; nil))) |
---|
| 88 | |
---|
| 89 | ;;; Converting codings. |
---|
| 90 | ;; Detect coding automatically. |
---|
| 91 | ;(setq liece-detect-coding-system t) |
---|
| 92 | ;; Convert deprecated hankaku kana to zenkaku kana. |
---|
| 93 | ;(setq liece-convert-hankaku-katakana t) |
---|
| 94 | |
---|
| 95 | ;; Saved Settings |
---|
| 96 | ;; End of Saved Settings |
---|