[Tcldrop/CVS] tcldrop/modules/channels channels.tcl

[Philip Moore]

CVSROOT:        /cvsroot/tcldrop
Module name:    tcldrop
Branch:         
Changes by:     Philip Moore <address@hidden>   03/12/01 02:12:08

Modified files:
        modules/channels: channels.tcl 

Log message:
        tweaks.

CVSWeb URLs:
http://savannah.gnu.org/cgi-bin/viewcvs/tcldrop/tcldrop/modules/channels/channels.tcl.diff?tr1=1.9&tr2=1.10&r1=text&r2=text

Patches:
Index: tcldrop/modules/channels/channels.tcl
diff -u tcldrop/modules/channels/channels.tcl:1.9 
tcldrop/modules/channels/channels.tcl:1.10
--- tcldrop/modules/channels/channels.tcl:1.9   Sun Nov 30 20:59:52 2003
+++ tcldrop/modules/channels/channels.tcl       Mon Dec  1 02:12:07 2003
@@ -1,6 +1,6 @@
 # channels.tcl --
 #
-# $Id: channels.tcl,v 1.9 2003/12/01 01:59:52 fireegl Exp $
+# $Id: channels.tcl,v 1.10 2003/12/01 07:12:07 fireegl Exp $
 #
 # Copyright (C) 2003 FireEgl (Philip Moore) <address@hidden>
 #
@@ -26,9 +26,9 @@
 #      Depends on: none.
 
 namespace eval ::tcldrop::channels {
-       # Provide the users module:
+       # Provide the channels module:
        variable version {0.8}
-       variable rcsid {$Id}
+       variable rcsid {$Id: channels.tcl,v 1.10 2003/12/01 07:12:07 fireegl 
Exp $}
        package provide tcldrop::channels $version
        # Initialize variables:
        variable Channels
@@ -367,6 +367,8 @@
        setudef str need-invite {}
        setudef str need-key {}
        setudef str need-limit {}
+       setudef str need-halfop {}
+       setudef str need-voice {}
        # Note, global-chanset better be a list:
        foreach f ${::global-chanset} {
                if {$f != {}} {