X-Git-Url: https://cgit.sxemacs.org/?p=riece;a=blobdiff_plain;f=lisp%2Friece-globals.el;h=814d41fa054d8cf23b84edbe0d7cc3bf34100aad;hp=6c183182afb38d4c61e5130ce9c27563ef72e999;hb=16490f74b1fd627bd05dd22cb4213bcbe164513b;hpb=2f125711ab9af88f8f767e0d76dcf0c099110c55

diff --git a/lisp/riece-globals.el b/lisp/riece-globals.el
index 6c18318..814d41f 100644
--- a/lisp/riece-globals.el
+++ b/lisp/riece-globals.el
@@ -65,8 +65,11 @@
 (defvar riece-reconnect-with-password nil
   "If non-nil, attempt to reconnect with password.")
 
-(defvar riece-obarray-size 1327
-  "The size of obarray used by riece on channelname and username space.")
+(defvar riece-user-obarray-size 1327
+  "The size of obarray used by riece on username space.")
+
+(defvar riece-channel-obarray-size 103
+  "The size of obarray used by riece on channelname space.")
 
 ;;; Variables local to the server buffers:
 (defvar riece-server-name nil
@@ -111,8 +114,17 @@ Local to the server buffers.")
 (defvar riece-send-queue nil
   "Send queue for avoiding client flood.
 Local to the server buffers.")
-(defvar riece-obarray nil
-  "Namespace of the IRC world.
+(defvar riece-send-size nil
+  "Size of the last send.
+Local to the server buffers.")
+(defvar riece-last-send-time nil
+  "Timestamp of the last send.
+Local to the server buffers.")
+(defvar riece-user-obarray nil
+  "USER namespace of the IRC world.
+Local to the server buffers.")
+(defvar riece-channel-obarray nil
+  "Channel namespace of the IRC world.
 Local to the server buffers.")
 (defvar riece-coding-system nil
   "Coding system for process I/O.
@@ -150,7 +162,10 @@ riece-channel-indicator.")
 user is away.")
 (defvar riece-operator-indicator "-"
   "String displayed on the modeline to allow the user to tell if the
-user is a operator.")
+user is an operator.")
+(defvar riece-channel-status-indicator "-"
+  "String displayed on the modeline to allow the user to tell if the
+user's status on the current channel.")
 
 ;;; Buffers:
 (defvar riece-command-buffer nil
@@ -163,9 +178,12 @@ user is a operator.")
   "Buffer for channel list.")
 (defvar riece-user-list-buffer nil
   "Buffer for user list.")
-
 (defvar riece-channel-buffer nil
   "Buffer for messages arrived in the current channel.")
+(defvar riece-temp-buffer nil
+  "Buffer for temporally use.")
+(defvar riece-debug-buffer nil
+  "Buffer for debug output.")
 
 (defvar riece-buffer-list nil)
 (defvar riece-overriding-server-name nil)