diff options
author | goodale <goodale@17b73243-c579-4c4c-a9d2-2d5706c11dac> | 1999-02-24 22:30:33 +0000 |
---|---|---|
committer | goodale <goodale@17b73243-c579-4c4c-a9d2-2d5706c11dac> | 1999-02-24 22:30:33 +0000 |
commit | 474ae3005d9bc56df6b9cf194b8a1618a0247607 (patch) | |
tree | 778294ba6dfe2210b895e5a76a487b914c72c761 /lib | |
parent | edf8447ab9a837ba44674444faf85c00d86e44b8 (diff) |
Some more debugging code.
Tom
git-svn-id: http://svn.cactuscode.org/flesh/trunk@341 17b73243-c579-4c4c-a9d2-2d5706c11dac
Diffstat (limited to 'lib')
-rw-r--r-- | lib/sbin/Orderer.pl | 6 |
1 files changed, 5 insertions, 1 deletions
diff --git a/lib/sbin/Orderer.pl b/lib/sbin/Orderer.pl index 08a1dc9c..b684ed33 100644 --- a/lib/sbin/Orderer.pl +++ b/lib/sbin/Orderer.pl @@ -8,7 +8,6 @@ # @enddesc #@@*/ - #/*@@ # @routine TestOrderList # @date Sun Feb 21 08:22:42 1999 @@ -154,6 +153,11 @@ sub OrderList # Finally, sort the strings. @thing_list = &SortThings("ALLBEFORE", "ALLAFTER", scalar(@things), @things, %database); +# foreach $thing (@thing_list) +# { +# print "thing is $thing\n"; +# } + return @thing_list; } |