X-Git-Url: https://cgit.sxemacs.org/?p=riece;a=blobdiff_plain;f=lisp%2Friece-options.el;h=333fd5c553f0d8daa51a47583137471260655a56;hp=e4263fa4903ec59c2c435b110758dd6a8ad72ebf;hb=005a2a7642c9f43d699922799801124a77d56f5d;hpb=8378ccdd8f0594577336bd9a6f643f815ee7d1fc diff --git a/lisp/riece-options.el b/lisp/riece-options.el index e4263fa..333fd5c 100644 --- a/lisp/riece-options.el +++ b/lisp/riece-options.el @@ -68,11 +68,6 @@ :type '(repeat integer) :group 'riece-looks) -(defcustom riece-inhibit-startup-message nil - "If non-nil, the startup message will not be displayed." - :group 'riece-looks - :type 'boolean) - (defcustom riece-directory "~/.riece" "Where to look for data files." :type 'directory @@ -105,7 +100,7 @@ way is to put Riece variables on .emacs or file loaded from there." :type '(repeat (file :tag "Initialization File")) :group 'riece-options) -(defcustom riece-addons nil +(defcustom riece-addons '(riece-highlight riece-ctcp) "Add-ons insinuated into Riece." :type '(repeat symbol) :group 'riece-options) @@ -182,11 +177,6 @@ way is to put Riece variables on .emacs or file loaded from there." :type 'string :group 'riece-server) -(defcustom riece-startup-channel-list nil - "A list of channels to join automatically at startup." - :type '(repeat (string :tag "Startup Channel")) - :group 'riece-channel) - (defcustom riece-retry-with-new-nickname nil "When nickname has already been in use, grow-tail automatically." :type 'boolean @@ -208,12 +198,7 @@ way is to put Riece variables on .emacs or file loaded from there." :group 'riece-looks) (defcustom riece-default-freeze nil - "If non nil, channel buffer local freeze flag is on at starting." - :type 'boolean - :group 'riece-looks) - -(defcustom riece-default-own-freeze nil - "If non nil, channel buffer local own freeze flag is on at starting." + "Channel buffer local freeze flag is on at starting." :type 'boolean :group 'riece-looks) @@ -229,8 +214,13 @@ way is to put Riece variables on .emacs or file loaded from there." :group 'riece-options) (defcustom riece-quit-message nil - "Default signoff message." - :type '(radio (string :tag "Signoff message")) + "Default quit message." + :type '(radio (string :tag "Quit message")) + :group 'riece-options) + +(defcustom riece-away-message nil + "Default away message." + :type '(radio (string :tag "Away message")) :group 'riece-options) (defcustom riece-gather-channel-modes t