3 |
# $Id$ |
# $Id$ |
4 |
# |
# |
5 |
# Copyright (C) 2003 FireEgl (Philip Moore) <FireEgl@Tcldrop.CJB.Net> |
# Copyright (C) 2003 FireEgl (Philip Moore) <FireEgl@Tcldrop.CJB.Net> |
6 |
# |
# |
7 |
# This program is free software; you can redistribute it and/or |
# This program is free software; you can redistribute it and/or |
8 |
# modify it under the terms of the GNU General Public License |
# modify it under the terms of the GNU General Public License |
9 |
# as published by the Free Software Foundation; either version 2 |
# as published by the Free Software Foundation; either version 2 |
10 |
# of the License, or (at your option) any later version. |
# of the License, or (at your option) any later version. |
11 |
# |
# |
12 |
# This program is distributed in the hope that it will be useful, |
# This program is distributed in the hope that it will be useful, |
13 |
# but WITHOUT ANY WARRANTY; without even the implied warranty of |
# but WITHOUT ANY WARRANTY; without even the implied warranty of |
14 |
# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the |
# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the |
15 |
# GNU General Public License for more details. |
# GNU General Public License for more details. |
16 |
# |
# |
17 |
# You should have received a copy of the GNU General Public License |
# You should have received a copy of the GNU General Public License |
18 |
# along with this program (see gpl.txt); if not, write to the |
# along with this program (see gpl.txt); if not, write to the |
19 |
# Free Software Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. |
# Free Software Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. |
20 |
# Or visit http://www.GNU.Org/licenses/gpl.html |
# Or visit http://www.GNU.Org/licenses/gpl.html |
21 |
# |
# |
22 |
# The author of this project can be reached at FireEgl@Tcldrop.CJB.Net |
# The author of this project can be reached at FireEgl@Tcldrop.CJB.Net |
23 |
# Or can be found on IRC (EFNet or FreeNode) as FireEgl. |
# Or can be found on IRC (EFNet or FreeNode) as FireEgl. |
24 |
# |
# |
206 |
# are no longer in use, and discard them. |
# are no longer in use, and discard them. |
207 |
array set Channels [read $fid [file size $::chanfile]] |
array set Channels [read $fid [file size $::chanfile]] |
208 |
close $fid |
close $fid |
209 |
|
SetUdefDefaults |
210 |
} else { |
} else { |
211 |
putlog "no chanfile exists..yet." |
putlog "no chanfile exists..yet." |
212 |
} |
} |