Menu

#9 Wish 8.0 and TIK 0.90

open
nobody
None
5
2001-07-23
2001-07-23
No

The error message that poped up was very helpful. I
fixed it and thought I would let you know about it. I
know you say to use at least TCL/TK 8.1 but I've been
using Wish
8.0 with no problems for a while now.

i kept getting an error saying encoding wasn't a
useable command for fconfigure.

It used to say
fconfigure $logfile -encoding UTF-8

sflap.tcl
----------------------------------------
proc sflap::puts_debug { entry } {
set logfile [open
$::TIK(options,sflap,logfile) a+]
fconfigure $logfile (***
-translation auto***)
puts $logfile $entry
close $logfile

components/imcapture.tcl
----------------------------------------------
if {![file exists [file join $::TIK(configDir) capture
$n.html]]} {
# This is the first IM from this buddy so setup the
HTML
# page with the beginning stuff:)
set f [open [file join $::TIK(configDir)
capture $n.html] a+]
fconfigure $f (***-translation auto
***)
puts $f [tik_str
P_IMCAPTURE_FILEHDR $nick]
} else {
set f [open [file join $::TIK(configDir)
capture $n.html] a+]
fconfigure $f (***-translation
auto***)
}
return $f

components/imchatcapture.tcl
--------------------------------------------
if {![file exists [file join $::TIK(configDir)
chatcapture $n.html]]} {
# This is the first chat room so setup the
HTML
# page with the beginning stuff:)
set f [open [file join $::TIK(configDir)
chatcapture $n.html] a+]
fconfigure $f (***-translation auto***)
puts $f [tik_str P_CHATCAPTURE_FILEHDR
$name]
} else {
set f [open [file join $::TIK(configDir)
chatcapture $n.html] a+]
fconfigure $f (***-translation auto***)
}
return $f

After i changed it to this It worked fine. I hope this
helps.
Sorry I put this in the bugs area to.

Discussion


Log in to post a comment.

Want the latest updates on software, tech news, and AI?
Get latest updates about software, tech news, and AI from SourceForge directly in your inbox once a month.