(defcustom riece-saved-forms
'(riece-server-alist
riece-channel-buffer-mode
- riece-user-list-buffer-mode)
+ riece-user-list-buffer-mode
+ riece-layout)
"Variables saved after each session is completed."
:type 'string
:group 'riece-options)
:type 'boolean
:group 'riece-options)
+(defcustom riece-command-prefix "\C-c"
+ "Key sequence to be used as prefix for command mode key bindings."
+ :type 'string
+ :group 'riece-options)
+
(defgroup riece-looks nil
"Related to look and feel"
:prefix "riece-"
:type 'boolean
:group 'riece-looks)
-(defcustom riece-tab-stop-list '(2 4 6 8 10 12 14 16)
- "To override `tab-stop-list'."
- :type '(repeat integer)
- :group 'riece-looks)
-
-(defcustom riece-directory "~/.riece"
+(defcustom riece-directory (expand-file-name "~/.riece")
"Where to look for data files."
:type 'directory
:group 'riece-options)
:type '(repeat (file :tag "Initialization File"))
:group 'riece-options)
-(defcustom riece-addons '(riece-highlight riece-ctcp riece-unread)
+(defcustom riece-addons '(riece-highlight
+ riece-ctcp
+ riece-guess
+ riece-unread
+ riece-history
+ riece-url
+ riece-button
+ riece-menu)
"Add-ons insinuated into Riece."
:type '(repeat symbol)
:group 'riece-options)
:type 'string
:group 'riece-server)
+(defcustom riece-startup-channel-list nil
+ "A list of channels to join automatically at startup."
+ :type '(repeat (choice (string :tag "Channel")
+ (list (string :tag "Channel") (string :tag "Key"))))
+ :group 'riece-channel)
+
(defcustom riece-retry-with-new-nickname nil
"When nickname has already been in use, grow-tail automatically."
:type 'boolean
:type 'function
:group 'riece-options)
-(defcustom riece-channel-history-length 3
- "Length of riece-channel-history."
- :type 'integer
- :group 'riece-options)
-
(provide 'riece-options)
;;; riece-options.el ends here