This is the new home of the egghelp.org community forum.
All data has been migrated (including user logins/passwords) to a new phpBB version.


For more information, see this announcement post. Click the X in the top right-corner of this box to dismiss this message.

myquote2 error - now solved

Support & discussion of released scripts, and announcements of new releases.
Locked
m
merryweather
Voice
Posts: 3
Joined: Wed Nov 02, 2005 9:18 pm

myquote2 error - now solved

Post by merryweather »

ok I dont understand anything to do with tcl , but i edited the file and all i get when i try to add a quote is this.
Tcl error [mq:addquote]: invalid command name "replace"

can someone tell me why ? , its driving me nuts
Last edited by merryweather on Sat Nov 05, 2005 11:09 am, edited 1 time in total.
m
merryweather
Voice
Posts: 3
Joined: Wed Nov 02, 2005 9:18 pm

Post by merryweather »

Well the probelm was solved, heres what got changed , its at the bottom of the tcl file

Code: Select all

proc mirc_strip {{args ""}} {
	set switches ""
	if {$switches == ""} {set switches all}
	set arg [lindex $args 0]
	set all [expr {([lsearch -exact $switches all] >= 0) ? 1 : 0}]
	set list [list \002 "" \017 "" \026 "" \037 ""]
	regsub -all -- "\003(\[0-9\]\[0-9\]?(,\[0-9\]\[0-9\]?)?)?" $arg "" arg
	#set arg [replace -- $arg [join $list]]
	set arg [string map {\002 "" \017 "" \026 "" \037 ""} $arg]	
	return $arg
}
hope it helps a few people , and my thanks to a friend called Ixelion who solved it.
User avatar
Sir_Fz
Revered One
Posts: 3793
Joined: Sun Apr 27, 2003 3:10 pm
Location: Lebanon
Contact:

Post by Sir_Fz »

Why make it so complicated.

Code: Select all

proc mirc_strip arg { 
 regsub -all -- {\003[0-9]{0,2}(,[0-9]{0,2})?} $arg "" arg 
 set arg [string map {\002 "" \017 "" \026 "" \037 ""} $arg] 
}
m
merryweather
Voice
Posts: 3
Joined: Wed Nov 02, 2005 9:18 pm

Post by merryweather »

jeesus , are you bitching at the reply or the code, maybe you want to read - I HAVE NO IDEA about tcl, or did you miss that point ?, how the hell am i or the anyone else with no experience supposed to make elite code like you expect ?. Maybe next time you would paste YOUR solution BEFORE those in need solve it . People like you who come in and make replys with sarcastic comments to those who dont understand code AFTER the fact, make me sick.

I wont be back to see a reply , have fun with the narcisistic attitude you have
Last edited by merryweather on Sat Nov 05, 2005 11:40 am, edited 1 time in total.
User avatar
Sir_Fz
Revered One
Posts: 3793
Joined: Sun Apr 27, 2003 3:10 pm
Location: Lebanon
Contact:

Post by Sir_Fz »

merryweather wrote:jeesus , are you gonna bitch for pasting a reply when no one else would !!. funny how the ONLY reply is to whine at a paste. NOT EVERYONE understands tcl and so it was easier to paste the whole section in case they fubar it editing.
Yeah, I am gonna :) it's not so funny though :lol:

Next time, read the sticky post in the scripting help forum, and post with valid info which we can use to help you. And learn how to spell.
Locked