]> bicyclesonthemoon.info Git - ott/bsta/blobdiff - chat.1.pl
Done comment system
[ott/bsta] / chat.1.pl
index 51fafdb2dd1c491fe2706626c9a9543ab641646c..583a46780ce7218543810cdf0eb8de10d5963e1b 100644 (file)
--- a/chat.1.pl
+++ b/chat.1.pl
@@ -156,7 +156,7 @@ if ($page < 0) {
                                                                $chat_state = CHAT_STATE->{'active'};
                                                                $chat{'state'} = $chat_state;
                                                        }
-                                                       write_data_file($fh, '', '', \%chat);
+                                                       write_data_file($fh, \%chat);
                                                }
                                                else {
                                                        $message = 'Invalid username.';
@@ -180,7 +180,7 @@ if ($page < 0) {
                                                                $chat_state = CHAT_STATE->{'ready'};
                                                                $chat{'state'} = $chat_state;
                                                        }
-                                                       write_data_file($fh, '', '', \%chat);
+                                                       write_data_file($fh, \%chat);
                                                }
                                                elsif ($words eq '') {
                                                        $message = 'Server ID missing.';
@@ -206,12 +206,12 @@ if ($page < 0) {
                                        if ($username =~ /^[A-Za-z]*$/) {
                                                $chat{'content'} .= 'leave@'.$username.': '.$words."\n";
                                                if ($username ne '') {
-                                                       write_data_file($fh, '', '', \%chat);
+                                                       write_data_file($fh, \%chat);
                                                }
                                                else {
                                                        my %new_chat;
                                                        if ($chat_state > 1) {
-                                                               write_data_file(DATA_CHAT_PATH.$chat_id, '', '', \%chat);
+                                                               write_data_file(DATA_CHAT_PATH.$chat_id, \%chat);
                                                                $new_chat{'id'} = $chat_id+1;
                                                        }
                                                        else {
@@ -219,7 +219,7 @@ if ($page < 0) {
                                                        }
                                                        $new_chat{'state'} = CHAT_STATE->{'disconnected'};
                                                        $new_chat{'content'} = '';
-                                                       write_data_file($fh, '', '', \%new_chat);
+                                                       write_data_file($fh, \%new_chat);
                                                }
                                        }
                                        else {
@@ -241,7 +241,7 @@ if ($page < 0) {
                                                        $chat_state = CHAT_STATE->{'active'};
                                                        $chat{'state'} = $chat_state;
                                                }
-                                               write_data_file($fh, '', '', \%chat);
+                                               write_data_file($fh, \%chat);
                                        }
                                        else {
                                                $message = 'Invalid username.';
@@ -305,10 +305,10 @@ my $newer_url = ($chat_id < ($last_id -1)) ?
 
 if ($password_ok) {
        my $password_query = url_query_encode({'p', $settings{'password'}});
-       $coin_url   = merge_url($coin_url  , {'query' => $password_query, 'append_query' => 1});
-       $oldest_url = merge_url($oldest_url, {'query' => $password_query, 'append_query' => 1});
-       $older_url  = merge_url($older_url , {'query' => $password_query, 'append_query' => 1});
-       $newer_url  = merge_url($newer_url , {'query' => $password_query, 'append_query' => 1});
+       $coin_url   = merge_url($coin_url  , {'query' => $password_query, 'append_query' => 1, 'preserve_fragment' => 1});
+       $oldest_url = merge_url($oldest_url, {'query' => $password_query, 'append_query' => 1, 'preserve_fragment' => 1});
+       $older_url  = merge_url($older_url , {'query' => $password_query, 'append_query' => 1, 'preserve_fragment' => 1});
+       $newer_url  = merge_url($newer_url , {'query' => $password_query, 'append_query' => 1, 'preserve_fragment' => 1});
 }
 
 my $abbr = abbr_name($username);