diff options
Diffstat (limited to 'src/server/httpd')
| -rw-r--r-- | src/server/httpd/httpd.tcl | 8 |
1 files changed, 0 insertions, 8 deletions
diff --git a/src/server/httpd/httpd.tcl b/src/server/httpd/httpd.tcl index a2fee129..5b012681 100644 --- a/src/server/httpd/httpd.tcl +++ b/src/server/httpd/httpd.tcl @@ -99,14 +99,6 @@ proc encode {a} { return [string map {\n <br/> { } { } \t { } > > < < / /} $a] } -# catch any exceptions, capture output and return it -proc capture_catch {a} { - catch { - capture {uplevel $a} - } result - return $result -} - proc first_flash_base {} { set t [lindex 0 [ocd_flash_banks]] return $t(base) |