doc/sample.dot.liece.in

   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 "")
  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 ;; Path settings
  33 ;; If you have installed as XEmacs package please set them to nil.
  34 (setq liece-intl-catalogue-directory "@CATALOGDIR@")
  35 (setq liece-window-style-directory "@STYLEDIR@")
  36
  37 (setq liece-window-default-style "middle")
  38
  39 ;; Highlighten IRC buffers.
  40 (setq liece-highlight-mode t)
  41 ;; If `liece-highlight-mode' is non-nil, strings which matches
  42 ;; following regular expression would be emphasized by colouring.
  43 ;(setq liece-highlight-pattern
  44 ;      (regexp-opt
  45 ;       '("foo" "bar" "baz.*")))
  46
  47 ;; Channels we want to join startup time.
  48 ;(setq liece-startup-channel-list
  49 ;      '("#foo" "#bar"))
  50 ;; Channel bindings to its numerical expression.
  51 ;; Each element of list are bound to n-th.
  52 ;(setq liece-default-channel-binding
  53 ;      '("#foo" nil "#baz" "#bar"))
  54
  55 ;; DCC external programs.
  56 ;; When this is not specified, we search `dcc' executable in exec-path.
  57 (setq liece-dcc-program
  58       (expand-file-name "@DCCPATH@"))
  59 ;; Don't receive any files automatically.
  60 (setq liece-dcc-receive-direct nil)
  61
  62 ;;; XEmacs specific features
  63 ;; Normal position of toolbar icons.
  64 (setq liece-icon-directory
  65       (expand-file-name "@ICONDIR@"))
  66 ;; Default toolbar position.
  67 ;(setq liece-toolbar-position 'top)
  68 ;; Display smiley mark.
  69 ;(setq liece-use-smiley t)
  70
  71 ;;; URL browsing.
  72 ;; Specify browser name. To see available browser names,
  73 ;; refer docstring of `liece-url-browser-function'.
  74 (setq liece-url-browser-name "netscape")
  75
  76 ;;; Encryption
  77 (setq liece-crypt-known-keys '("foo" "bar"))
  78 (setq liece-crypt-default-keys '(("#foo" . "bar")))
  79
  80 ;;; Automatic invisible.
  81 ;(add-hook 'liece-after-001-hook
  82 ;                 (function (lambda (prefix rest)
  83 ;                     (liece-send
  84 ;                      "MODE %s +i" liece-real-nickname)
  85 ;                     nil)))
  86
  87 ;;; Converting codings.
  88 ;; Detect coding automatically.
  89 ;(setq liece-detect-coding-system t)
  90 ;; Convert deprecated hankaku kana to zenkaku kana.
  91 ;(setq liece-convert-hankaku-katakana t)