File: tron.awk
patch-19 patch-20
Line 119Line 119
# example code is wrapped and skipped
$1 ~ /^-+(8<|>8)-+$/ && blockquotemode != "on" {
        sub(/^-+(8<|>8)-+/, "<p><pre class=\"code\">", $1)
# example code is wrapped and skipped
$1 ~ /^-+(8<|>8)-+$/ && blockquotemode != "on" {
        sub(/^-+(8<|>8)-+/, "<p><pre class=\"code\">", $1)

        for( i = 2; i <= NF; i++ ) {
                if( $i ~ /^\$/ ) {
                        sub(/^\$[[:blank:]]+/, "$ <strong class=\"cmdline\">", $i)
                        sub(/$/, "</strong>", $i)
                }
        }
        if( $NF ~ /^-+(8<|>8)-+$/ ) {
                sub(/^-+(8<|>8)-+$/, "</pre></p>", $NF)
        } else {
        if( $NF ~ /^-+(8<|>8)-+$/ ) {
                sub(/^-+(8<|>8)-+$/, "</pre></p>", $NF)
        } else {
Line 133Line 139
$NF ~ /^-+(8<|>8)-+$/ && blockquotemode == "on" {
        sub(/^-+(8<|>8)-+$/, "</pre></p>", $NF)
        blockquotemode = "off"
$NF ~ /^-+(8<|>8)-+$/ && blockquotemode == "on" {
        sub(/^-+(8<|>8)-+$/, "</pre></p>", $NF)
        blockquotemode = "off"

        for( i = 1; i < NF; i++ ) {
                if( $i ~ /^\$/ ) {
                        sub(/^\$[[:blank:]]+/, "$ <strong class=\"cmdline\">", $i)
                        sub(/$/, "</strong>", $i)
                }
        }
        print >> outputfile
        print >> printerfile
        next
}

blockquotemode == "on" {
        print >> outputfile
        print >> printerfile
        next
}

blockquotemode == "on" {

        for( i = 1; i <= NF; i++ ) {
                if( $i ~ /^\$/ ) {
                        sub(/^\$[[:blank:]]+/, "$ <strong class=\"cmdline\">", $i)
                        sub(/$/, "</strong>", $i)
                }
        }
        print >> outputfile
        print >> printerfile
        next
        print >> outputfile
        print >> printerfile
        next