X-Git-Url: http://git.chise.org/gitweb/?a=blobdiff_plain;f=lisp%2Friece-globals.el;h=017e037f80dcbc9bc884677725dffce118ba2746;hb=1db0d620fd66e1d18a989fcb17e7c69e9aef9cf7;hp=676daca072c48e5d4ac54fad8d922e78f86c25e3;hpb=b81afea4671285e3a60ef569c20f8a28545b741b;p=elisp%2Friece.git diff --git a/lisp/riece-globals.el b/lisp/riece-globals.el index 676daca..017e037 100644 --- a/lisp/riece-globals.el +++ b/lisp/riece-globals.el @@ -19,8 +19,8 @@ ;; You should have received a copy of the GNU General Public License ;; along with GNU Emacs; see the file COPYING. If not, write to the -;; Free Software Foundation, Inc., 59 Temple Place - Suite 330, -;; Boston, MA 02111-1307, USA. +;; Free Software Foundation, Inc., 51 Franklin Street, Fifth Floor, +;; Boston, MA 02110-1301, USA. ;;; Code: @@ -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 user name space.") + +(defvar riece-channel-obarray-size 103 + "The size of obarray used by riece on channel name space.") + +(defvar riece-addon-dependencies nil) ;;; Variables local to the server buffers: (defvar riece-server-name nil @@ -108,6 +113,9 @@ Local to the server buffers.") (defvar riece-read-point nil "Point at the last input was seen. Local to the server buffers.") +(defvar riece-filter-running nil + "Lock of the process filter; non-nil indicates the process filter is running. +Local to the server buffers.") (defvar riece-send-queue nil "Send queue for avoiding client flood. Local to the server buffers.") @@ -117,12 +125,21 @@ Local to the server buffers.") (defvar riece-last-send-time nil "Timestamp of the last send. Local to the server buffers.") -(defvar riece-obarray nil - "Namespace of the IRC world. +(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. Local to the server buffers.") +(defvar riece-channel-cache nil + "Cache of channel names. +Local to the server buffers.") +(defvar riece-user-cache nil + "Cache of user names. +Local to the server buffers.") ;;; Variables local to the channel buffers: (defvar riece-freeze nil @@ -140,6 +157,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" @@ -172,9 +190,12 @@ user's status on the current channel.") "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)