Parent Directory | Revision Log | Patch
revision 1.14 by fireegl, Fri May 23 00:48:35 2003 UTC | revision 1.15 by fireegl, Sun May 25 11:18:24 2003 UTC | |
---|---|---|
# | Line 27 | Line 27 |
27 | ||
28 | namespace eval ::tcldrop::irc { | namespace eval ::tcldrop::irc { |
29 | # Provide the users module: | # Provide the users module: |
30 | package provide tcldrop-irc 0.2 | variable version {0.2} |
31 | variable rcsid {$Id} | |
32 | package provide tcldrop-irc $version | |
33 | # Initialize variables: | # Initialize variables: |
34 | variable Nicks | variable Nicks |
35 | array set Nicks {} | array set Nicks {} |
# | Line 968 proc ::tcldrop::irc::issomething {nick c | Line 970 proc ::tcldrop::irc::issomething {nick c |
970 | array unset channick | array unset channick |
971 | } | } |
972 | return [info exists found] | return [info exists found] |
} | ||
973 | } |
|
savannah-hackers-public@gnu.org | ViewVC Help |
Powered by ViewVC 1.1.26 |