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 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101 102 103 104 105 106 107 108 109 110 111 112 113 114 115 116 117 118 119 120 121 122 123 124 125 126 127
|
AT_BANNER([[Handling RCS tags in working files.]])
AT_SETUP([Valid revision])
AT_KEYWORDS([working])
AT_KEYWORDS([rev])
cp $testdir/keywords.experr experr
cat <<EOF > keywords
\$Revision: 1.1 \$
EOF
AT_CHECK([[blame -r'$' $testdir/keywords,v]], 0, ignore, experr)
cat <<EOF > keywords
\$Id: keywords,v 1.1 2001/01/01 01:01:01 username Exp \$
EOF
AT_CHECK([[blame -r'$' $testdir/keywords,v]], 0, ignore, experr)
cat <<EOF > keywords
\$Header: $testdir/keywords,v 1.1 2001/01/01 01:01:01 username Exp \$
EOF
AT_CHECK([[blame -r'$' $testdir/keywords,v]], 0, ignore, experr)
AT_CLEANUP
AT_SETUP([Early revision])
AT_KEYWORDS([working])
AT_KEYWORDS([rev])
AT_KEYWORDS([errors])
cat <<EOF > keywords
\$Revision: 1.0 \$
EOF
AT_CHECK([[blame -r'$' $testdir/keywords,v]], 1, , ignore)
MAC_CHECK_STDERR
cat <<EOF > keywords
\$Id: keywords,v 1.0 2001/01/01 01:01:01 username Exp \$
EOF
AT_CHECK([[blame -r'$' $testdir/keywords,v]], 1, , ignore)
MAC_CHECK_STDERR
cat <<EOF > keywords
\$Header: $testdir/keywords,v 1.0 2001/01/01 01:01:01 username Exp \$
EOF
AT_CHECK([[blame -r'$' $testdir/keywords,v]], 1, , ignore)
MAC_CHECK_STDERR
AT_CLEANUP
AT_SETUP([Late revision])
AT_KEYWORDS([working])
AT_KEYWORDS([rev])
cp $testdir/keywords.experr experr
cat <<EOF > keywords
\$Revision: 1.2 \$
EOF
AT_CHECK([[blame -r'$' $testdir/keywords,v]], 0, ignore, experr)
cat <<EOF > keywords
\$Id: keywords,v 1.2 2001/01/01 01:01:01 username Exp \$
EOF
AT_CHECK([[blame -r'$' $testdir/keywords,v]], 0, ignore, experr)
cat <<EOF > keywords
\$Header: $testdir/keywords,v 1.2 2001/01/01 01:01:01 username Exp \$
EOF
AT_CHECK([[blame -r'$' $testdir/keywords,v]], 0, ignore, experr)
AT_CLEANUP
AT_SETUP([Branch])
AT_KEYWORDS([working])
AT_KEYWORDS([rev])
AT_KEYWORDS([errors])
cat <<EOF > keywords
\$Revision: 1 \$
EOF
AT_CHECK([[blame -r'$' $testdir/keywords,v]], 1, , ignore)
MAC_CHECK_STDERR
cat <<EOF > keywords
\$Id: keywords,v 1 2001/01/01 01:01:01 username Exp \$
EOF
AT_CHECK([[blame -r'$' $testdir/keywords,v]], 1, , ignore)
MAC_CHECK_STDERR
cat <<EOF > keywords
\$Header: $testdir/keywords,v 1 2001/01/01 01:01:01 username Exp \$
EOF
AT_CHECK([[blame -r'$' $testdir/keywords,v]], 1, , ignore)
MAC_CHECK_STDERR
AT_CLEANUP
AT_SETUP([Other non-revision])
AT_KEYWORDS([working])
AT_KEYWORDS([rev])
AT_KEYWORDS([errors])
cat <<EOF > keywords
\$Revision: bar \$
EOF
AT_CHECK([[blame -r'$' $testdir/keywords,v]], 1, , ignore)
MAC_CHECK_STDERR
cat <<EOF > keywords
\$Id: keywords,v bar 2001/01/01 01:01:01 username Exp \$
EOF
AT_CHECK([[blame -r'$' $testdir/keywords,v]], 1, , ignore)
MAC_CHECK_STDERR
cat <<EOF > keywords
\$Header: $testdir/keywords,v bar 2001/01/01 01:01:01 username Exp \$
EOF
AT_CHECK([[blame -r'$' $testdir/keywords,v]], 1, , ignore)
MAC_CHECK_STDERR
AT_CLEANUP
AT_SETUP([Parsing escape sequences])
AT_KEYWORDS([working])
AT_KEYWORDS([rev])
cp $testdir/keywords.experr experr
cat <<EOF > keywords
\$Id: file\twith\nweird\\symbols\040in\044it,v 1.1 2001/01/01 01:01:01 username Exp \$
EOF
AT_CHECK([[blame -r'$' $testdir/keywords,v]], 0, ignore, experr)
AT_CLEANUP
AT_SETUP([Producing escape sequences])
AT_KEYWORDS([working])
cp $testdir/escape,v 'x$ x,v'
cat <<EOF > 'x$ x'
\$Id: x\044\040x,v 1.1 2001/01/01 01:01:01 username Exp \$
EOF
cat $testdir/escape.experr | sed 's,escape,x$ x,g' > experr
AT_CHECK([[blame -r1.1 'x$ x']], 0, ignore, experr)
AT_CLEANUP
AT_SETUP([Mixing escape characters])
AT_KEYWORDS([working])
cp $testdir/escape-1.2.expout expout
cp $testdir/escape.experr experr
AT_CHECK([[blame -r1.2 $testdir/escape,v]], 0, expout, experr)
AT_CLEANUP
|