diff options
author | Matt Johnston <matt@ucc.asn.au> | 2007-01-11 02:41:05 +0000 |
---|---|---|
committer | Matt Johnston <matt@ucc.asn.au> | 2007-01-11 02:41:05 +0000 |
commit | a938f4cfe140e8561d9dbf108b896492a662a893 (patch) | |
tree | f2a74322f959ff6a505ba5e87274ebe3d17d5e74 /libtomcrypt/fixupind.pl | |
parent | 692d737a821c5e401c227d936b8f0d76b955650f (diff) | |
parent | 28ad393b008b34bc3cdbaa192440b8cc615329f0 (diff) |
propagate from branch 'au.asn.ucc.matt.ltc.dropbear' (head 2af22fb4e878750b88f80f90d439b316d229796f)
to branch 'au.asn.ucc.matt.dropbear' (head 02c413252c90e9de8e03d91e9939dde3029f5c0a)
--HG--
extra : convert_revision : 52ccb0ad0587a62bc64aecb939adbb76546aac16
Diffstat (limited to 'libtomcrypt/fixupind.pl')
-rw-r--r-- | libtomcrypt/fixupind.pl | 11 |
1 files changed, 11 insertions, 0 deletions
diff --git a/libtomcrypt/fixupind.pl b/libtomcrypt/fixupind.pl new file mode 100644 index 0000000..543ae96 --- /dev/null +++ b/libtomcrypt/fixupind.pl @@ -0,0 +1,11 @@ +open(IN,"<crypt.ind"); +open(OUT,">crypt.ind.tmp"); +$a = <IN>; +print OUT "$a\n\\addcontentsline{toc}{chapter}{Index}\n"; +while (<IN>) { + print OUT $_; +} +close OUT; +close IN; +system("mv -f crypt.ind.tmp crypt.ind"); + |