webif/webif/lib/escape

15 lines
198 B
Plaintext

if {![exists -proc jescape]} {
proc jescape {str} {
return [string map {
"\"" "\\\""
"\n" " "
} $str]
#regsub -all -- {"} "$str" "\\\"" str
#return $str
}
alias escape jescape
}