diff options
Diffstat (limited to 'src/server/httpd/openocd.tcl')
-rw-r--r-- | src/server/httpd/openocd.tcl | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/server/httpd/openocd.tcl b/src/server/httpd/openocd.tcl index cb28026e..4fed3877 100644 --- a/src/server/httpd/openocd.tcl +++ b/src/server/httpd/openocd.tcl @@ -154,8 +154,8 @@ append buffer { set form_command [formfetch form_command]
set form_edittext ""
- if {[string length $form_command]>0} {
- catch {capture_catch {eval "$form_command"}} form_edittext
+ if {[string length $form_command]>0} {
+ set form_edittext [capture_catch {eval $form_command}]
}
append buffer {<form action="openocd.tcl" method="post">} "\n"
|