File: broken.test

package info (click to toggle)
libapache2-mod-rivet 3.2.2-1
  • links: PTS
  • area: main
  • in suites: bookworm
  • size: 6,296 kB
  • sloc: xml: 8,554; tcl: 7,568; ansic: 7,094; sh: 5,017; makefile: 195; sql: 91; lisp: 78
file content (26 lines) | stat: -rw-r--r-- 590 bytes parent folder | download | duplicates (4)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
# $Id$

set testfilename1 broken.rvt

::tcltest::test broken-1.1 {error page test} {
    apachetest::start {} {} {
        catch {
            set page [::http::geturl "${urlbase}$testfilename1"]
            set match [string trim [::http::data $page]]
        }
    }
    set match
} {<pre>invalid command name "broken"
    while executing
"broken"
    (in namespace eval "::request" script line 4)
    invoked from within
"namespace eval ::request $script"
    ("::try" body line 12)<hr/><p>OUTPUT BUFFER:</p>puts -nonewline ""

# non-existent command
broken

puts -nonewline "
"
</pre>}