diff options
| author | allen <allen@17b73243-c579-4c4c-a9d2-2d5706c11dac> | 1999-10-24 10:17:30 +0000 |
|---|---|---|
| committer | allen <allen@17b73243-c579-4c4c-a9d2-2d5706c11dac> | 1999-10-24 10:17:30 +0000 |
| commit | ec55bd54d7bf81017efe2886fc75a3c108811098 (patch) | |
| tree | e3bc8cafdf2e76779e5e9d7b2b88310a8478d81e /lib/sbin/BuildActiveThorns.pl | |
| parent | ef26d6c1ee4d4380e21afdf618a55bc2048478c7 (diff) | |
Print a comment at the top of the ThornList
git-svn-id: http://svn.cactuscode.org/flesh/trunk@1088 17b73243-c579-4c4c-a9d2-2d5706c11dac
Diffstat (limited to 'lib/sbin/BuildActiveThorns.pl')
| -rw-r--r-- | lib/sbin/BuildActiveThorns.pl | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/lib/sbin/BuildActiveThorns.pl b/lib/sbin/BuildActiveThorns.pl index 15fcb65a..c141a8fa 100644 --- a/lib/sbin/BuildActiveThorns.pl +++ b/lib/sbin/BuildActiveThorns.pl @@ -15,6 +15,8 @@ $package_dir = shift(@ARGV); %info = &buildthorns($package_dir,"thorns"); +printf("# arrangement/thorn %-14s # implements (inherits) [friend] {shares}\n#\n"); + foreach $thorn (sort keys %info) { printf("%-34s # %s\n",$thorn,$info{$thorn}); |