tquote1 - plan9port - [fork] Plan 9 from user space
 (HTM) git clone git://src.adamsgaard.dk/plan9port
 (DIR) Log
 (DIR) Files
 (DIR) Refs
 (DIR) README
 (DIR) LICENSE
       ---
       tquote1 (251B)
       ---
            1 #!/usr/local/plan9/bin/rc
            2 
            3 . 9.rc
            4 
            5 PROMPT='[^         ]*[%;$#][         ]+'
            6 
            7 fn cmds {
            8         wintext | sed -n 's/^'$PROMPT'([^"])/        \1/p'
            9 }
           10 
           11 switch($#*) {
           12 case 0
           13         cmds | tail -1
           14 case *
           15         cmds | grep -n '^        '^$"* | tail -r |
           16                 sort -u +1 | sort -n |
           17                 sed 's/^[0-9]+: //'
           18 }