* riece-options.el (riece-part-message): New user option.
[riece] / lisp / riece-options.el
index 48d78a2..c55dd33 100644 (file)
@@ -116,7 +116,9 @@ way is to put Riece variables on .emacs or file loaded from there."
                          riece-icon
                          riece-ignore
                          riece-log
-                         riece-toolbar)
+                         riece-toolbar
+                         riece-alias
+                         riece-ctlseq)
   "Add-ons insinuated into Riece."
   :type '(repeat symbol)
   :group 'riece-options)
@@ -196,8 +198,7 @@ way is to put Riece variables on .emacs or file loaded from there."
                (const :tag "No" nil))
   :group 'riece-server)
 
-(defcustom riece-username (or (getenv "IRCNAME")
-                             user-full-name)
+(defcustom riece-username nil
   "Your user name."
   :type 'string
   :group 'riece-server)
@@ -271,6 +272,12 @@ way is to put Riece variables on .emacs or file loaded from there."
   :type '(string :tag "Quit message")
   :group 'riece-options)
 
+(defcustom riece-part-message nil
+  "Default part message."
+  :type '(choice (const :tag "No message" nil)
+                (string :tag "Part message"))
+  :group 'riece-options)
+
 (defcustom riece-away-message "Gone"
   "Default away message."
   :type '(string :tag "Away message")
@@ -281,7 +288,7 @@ way is to put Riece variables on .emacs or file loaded from there."
   :type 'boolean
   :group 'riece-options)
 
-(defcustom riece-buffer-dispose-function #'bury-buffer
+(defcustom riece-buffer-dispose-function #'kill-buffer
   "Function called after the buffer was disposed."
   :type 'function
   :group 'riece-options)
@@ -291,7 +298,7 @@ way is to put Riece variables on .emacs or file loaded from there."
   :type 'integer
   :group 'riece-options)
 
-(defcustom riece-max-buffer-size 65535
+(defcustom riece-max-buffer-size nil
   "Maximum size of channel buffers."
   :type '(radio (integer :tag "Number of characters")
                (const nil))