Mercurial > dropbear
comparison libtomcrypt/fixupind.pl @ 389:5ff8218bcee9
propagate from branch 'au.asn.ucc.matt.ltm.dropbear' (head 2af95f00ebd5bb7a28b3817db1218442c935388e)
to branch 'au.asn.ucc.matt.dropbear' (head ecd779509ef23a8cdf64888904fc9b31d78aa933)
author | Matt Johnston <matt@ucc.asn.au> |
---|---|
date | Thu, 11 Jan 2007 03:14:55 +0000 |
parents | 0cbe8f6dbf9e |
children |
comparison
equal
deleted
inserted
replaced
388:fb54020f78e1 | 389:5ff8218bcee9 |
---|---|
1 open(IN,"<crypt.ind"); | |
2 open(OUT,">crypt.ind.tmp"); | |
3 $a = <IN>; | |
4 print OUT "$a\n\\addcontentsline{toc}{chapter}{Index}\n"; | |
5 while (<IN>) { | |
6 print OUT $_; | |
7 } | |
8 close OUT; | |
9 close IN; | |
10 system("mv -f crypt.ind.tmp crypt.ind"); | |
11 |