Lock.pm: several style changes, comments added and fixed a small bug

[selfforum.git] / selfforum-cgi / shared / Posting / _lib.pm

diff --git a/selfforum-cgi/shared/Posting/_lib.pm b/selfforum-cgi/shared/Posting/_lib.pm
index 5441830b7cc85f478e04882773f4d4fe0682b527..0f3f015d1050431e3f0fdead3b69242331aef502 100644 (file)
--- a/selfforum-cgi/shared/Posting/_lib.pm
+++ b/selfforum-cgi/shared/Posting/_lib.pm
@@ -21,12 +21,18 @@ use XML::DOM;
 # Export
 # ====================================================
 
 # Export
 # ====================================================
 

+use constant SORT_ASCENT  => 0; # (young postings first)
+use constant SORT_DESCENT => 1;
+use constant KEEP_DELETED => 1;
+use constant KILL_DELETED => 0;
+

 use base qw(Exporter);
 @Posting::_lib::EXPORT_OK = qw(
   get_message_header get_message_body get_message_node get_body_node parse_single_thread parse_xml_file
   hr_time short_hr_time long_hr_time
   get_all_threads create_forum_xml_string
   save_file
 use base qw(Exporter);
 @Posting::_lib::EXPORT_OK = qw(
   get_message_header get_message_body get_message_node get_body_node parse_single_thread parse_xml_file
   hr_time short_hr_time long_hr_time
   get_all_threads create_forum_xml_string
   save_file

+  SORT_ASCENT   SORT_DESCENT   KEEP_DELETED   KILL_DELETED

 );
 
 # ====================================================
 );
 
 # ====================================================