X-Git-Url: https://cgit.sxemacs.org/?a=blobdiff_plain;f=lisp%2Friece-globals.el;h=57f97fa5d11535253cf6e66549e02ef3b7f8a7e8;hb=6ee663fa3d9fae9b26cf1494676c3f64f849b173;hp=ecf6b920563df36aacd7994e821a1d04f314cf92;hpb=061c69f9f37a198f57ac283044e4c497a13311bd;p=riece diff --git a/lisp/riece-globals.el b/lisp/riece-globals.el index ecf6b92..57f97fa 100644 --- a/lisp/riece-globals.el +++ b/lisp/riece-globals.el @@ -65,8 +65,13 @@ (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.") + +(defvar riece-addon-dependencies nil) ;;; Variables local to the server buffers: (defvar riece-server-name nil @@ -108,8 +113,20 @@ Local to the server buffers.") (defvar riece-read-point nil "Point at the last input was seen. Local to the server buffers.") -(defvar riece-obarray nil - "Namespace of the IRC world. +(defvar riece-send-queue nil + "Send queue for avoiding client flood. +Local to the server buffers.") +(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. @@ -131,6 +148,7 @@ Local to the channel buffers.") Local to the channel buffers.") ;;; Modeline indicators: +(defvar riece-mode-line-buffer-identification nil) (defvar riece-channel-indicator "None" "String displayed on the modeline to indicate the current channel.") (defvar riece-long-channel-indicator "None" @@ -147,7 +165,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 @@ -160,9 +181,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)