# # # patch "ChangeLog.pm" # from [811c554cf93c14ca9f01851b33e122280470fbfa] # to [0bcce5bab01ed8d7f2ad28c2a11c2be78674f6b7] # # patch "mtn-browse.glade" # from [ec7ec4bdb1b3d30d8d849e2b41d665727deb8904] # to [1bfb2911bbcd59175423e0283fb32ed1fb0960d2] # ============================================================ --- ChangeLog.pm 811c554cf93c14ca9f01851b33e122280470fbfa +++ ChangeLog.pm 0bcce5bab01ed8d7f2ad28c2a11c2be78674f6b7 @@ -45,6 +45,25 @@ use warnings; use strict; use warnings; +# ***** GLOBAL DATA DECLARATIONS ***** + +# The translated revision change type strings. + +my $__added = __("Added"); +my $__removed = __("Removed"); +my $__changed = __("Changed"); +my $__renamed = __("Renamed"); +my $__attributes = __("Attributes"); + +# A translated list of all possible revision change types that we need to check +# for. + +my @__types = ($__added, + $__removed, + $__changed, + $__renamed, + $__attributes); + # ***** FUNCTIONAL PROTOTYPES ***** # Public routines. @@ -150,11 +169,6 @@ sub generate_revision_report($$$$;$) %revision_data, %seen, @unique); - my @types = (__("Added"), - __("Removed"), - __("Changed"), - __("Renamed"), - __("Attributes")); # Sort out colour attributes. @@ -177,7 +191,7 @@ sub generate_revision_report($$$$;$) __("Revision id: "), $bold); $text_buffer->insert_with_tags_by_name($text_buffer->get_end_iter(), - $revision_id . "\n\n", + $revision_id . "\n", $normal); # Certs. @@ -195,23 +209,30 @@ sub generate_revision_report($$$$;$) { my $change_log = $cert->{value}; $change_log =~ s/\s+$//s; - push(@change_logs, $change_log); + push(@change_logs, $change_log) if ($change_log ne ""); } else { - $cert->{value} =~ s/T/ / if ($cert->{name} eq "date"); + if ($cert->{name} eq "date") + { + $cert->{value} =~ s/T/ /; + } + elsif (index($cert->{value}, "\n") >= 0) + { + my $padding = sprintf("\n%-*s", $cert_max_len + 2, ""); + $cert->{value} =~ s/\n/$padding/g; + } $text_buffer->insert_with_tags_by_name ($text_buffer->get_end_iter(), - sprintf("%-*s ", + sprintf("\n%-*s ", $cert_max_len + 1, ucfirst($cert->{name}) . ":"), $bold); $text_buffer->insert_with_tags_by_name ($text_buffer->get_end_iter(), - sprintf("%s\n", $cert->{value}), + sprintf("%s", $cert->{value}), $normal); } } - push(@change_logs, "") if (scalar(@change_logs) == 0); # Change log(s). @@ -220,8 +241,7 @@ sub generate_revision_report($$$$;$) { $text_buffer->insert_with_tags_by_name($text_buffer->get_end_iter(), "\n", - $normal) - if ($i > 1); + $normal); $text_buffer->insert_with_tags_by_name ($text_buffer->get_end_iter(), __x("\nChange Log{optional_count}:\n", @@ -244,7 +264,7 @@ sub generate_revision_report($$$$;$) $text_buffer->insert_with_tags_by_name($text_buffer->get_end_iter(), __("\n\nChanges Made:\n"), $bold); - foreach my $type (@types) + foreach my $type (@__types) { $revision_data{$type} = []; } @@ -252,35 +272,35 @@ sub generate_revision_report($$$$;$) { if ($change->{type} eq "add_dir") { - push(@{$revision_data{__("Added")}}, $change->{name} . "/"); + push(@{$revision_data{$__added}}, $change->{name} . "/"); } elsif ($change->{type} eq "add_file") { - push(@{$revision_data{__("Added")}}, $change->{name}); + push(@{$revision_data{$__added}}, $change->{name}); } elsif ($change->{type} eq "delete") { - push(@{$revision_data{__("Removed")}}, $change->{name}); + push(@{$revision_data{$__removed}}, $change->{name}); } elsif ($change->{type} eq "patch") { - push(@{$revision_data{__("Changed")}}, $change->{name}); + push(@{$revision_data{$__changed}}, $change->{name}); } elsif ($change->{type} eq "rename") { - push(@{$revision_data{__("Renamed")}}, + push(@{$revision_data{$__renamed}}, $change->{from_name} . " -> " . $change->{to_name}); } elsif ($change->{type} eq "clear") { - push(@{$revision_data{__("Attributes")}}, + push(@{$revision_data{$__attributes}}, __x("{name}: {attribute} was cleared", name => $change->{name}, attribute => $change->{attribute})); } elsif ($change->{type} eq "set") { - push(@{$revision_data{__("Attributes")}}, + push(@{$revision_data{$__attributes}}, sprintf("%s: %s = %s", $change->{name}, $change->{attribute}, @@ -295,7 +315,7 @@ sub generate_revision_report($$$$;$) $manifest_id = $change->{manifest_id}; } } - foreach my $type (@types) + foreach my $type (@__types) { if (scalar(@{$revision_data{$type}}) > 0) { ============================================================ --- mtn-browse.glade ec7ec4bdb1b3d30d8d849e2b41d665727deb8904 +++ mtn-browse.glade 1bfb2911bbcd59175423e0283fb32ed1fb0960d2 @@ -523,7 +523,7 @@ criteria for selecting a revision True GTK_RELIEF_NONE - True + False @@ -552,7 +552,7 @@ in Monotone-Viz in Monotone-Viz True GTK_RELIEF_NONE - True + False @@ -579,7 +579,7 @@ in Monotone-Viz View revision's change history True GTK_RELIEF_NONE - True + False @@ -607,7 +607,7 @@ in Monotone-Viz View revision's change log True GTK_RELIEF_NONE - True + False @@ -777,7 +777,7 @@ in Monotone-Viz Go up one directory level True GTK_RELIEF_NONE - True + False @@ -806,7 +806,7 @@ or more search criteria or more search criteria True GTK_RELIEF_NONE - True + False @@ -1393,7 +1393,7 @@ of line numbers of line numbers True GTK_RELIEF_NONE - True + False False False @@ -1423,7 +1423,7 @@ of line numbers Search text True GTK_RELIEF_NONE - True + False @@ -1451,7 +1451,7 @@ of line numbers Save file contents to disk True GTK_RELIEF_NONE - True + False @@ -1480,7 +1480,7 @@ into a viewer into a viewer True GTK_RELIEF_NONE - True + False @@ -1508,7 +1508,7 @@ into a viewer Annotate file contents True GTK_RELIEF_NONE - True + False @@ -1535,7 +1535,7 @@ into a viewer View file's change history True GTK_RELIEF_NONE - True + False @@ -2527,7 +2527,7 @@ entry field if you cannot remember the s Execute the query True GTK_RELIEF_NONE - True + False @@ -2556,7 +2556,7 @@ entry field if you cannot remember the s Stop the query True GTK_RELIEF_NONE - True + False @@ -2603,7 +2603,7 @@ entry field if you cannot remember the s Enter the current selector into the query above True GTK_RELIEF_NONE - True + False @@ -3339,7 +3339,7 @@ Tag Stop gathering history details True GTK_RELIEF_NONE - True + False @@ -3647,7 +3647,7 @@ file version that is to be comparedCompare the two selected files True GTK_RELIEF_NONE - True + False @@ -3854,7 +3854,7 @@ selected file in an external viewer True GTK_RELIEF_NONE - True + False @@ -3881,7 +3881,7 @@ selected file in an external viewerSave the differences to disk True GTK_RELIEF_NONE - True + False @@ -3910,7 +3910,7 @@ selected file in an external viewerStop formatting the comparison results True GTK_RELIEF_NONE - True + False @@ -5405,7 +5405,7 @@ make sure it is mono-spaced) True True True - True + False 0 @@ -5778,7 +5778,7 @@ in comparison listings True False Pick A Colour - True + False 2 @@ -5796,7 +5796,7 @@ in comparison listings True False Pick A Colour - True + False 2 @@ -5814,7 +5814,7 @@ in comparison listings True False Pick A Colour - True + False 2 @@ -5832,7 +5832,7 @@ in comparison listings True False Pick A Colour - True + False 4 @@ -5850,7 +5850,7 @@ in comparison listings True False Pick A Colour - True + False 4 @@ -5868,7 +5868,7 @@ in comparison listings True False Pick A Colour - True + False 4 @@ -5986,7 +5986,7 @@ used in context lines True False Pick A Colour - True + False 6 @@ -6038,7 +6038,7 @@ used in context lines True False Pick A Colour - True + False 6 @@ -6122,7 +6122,7 @@ used in annotated listings True False Pick A Colour - True + False 2 @@ -6173,7 +6173,7 @@ used in annotated listings True False Pick A Colour - True + False 4 @@ -6389,7 +6389,7 @@ used in annotated listings True False Pick A Colour - True + False 2 @@ -6407,7 +6407,7 @@ used in annotated listings True False Pick A Colour - True + False 2 @@ -6425,7 +6425,7 @@ used in annotated listings True False Pick A Colour - True + False 4 @@ -6443,7 +6443,7 @@ used in annotated listings True False Pick A Colour - True + False 4 @@ -6610,7 +6610,7 @@ type to the list type to the list True GTK_RELIEF_NONE - True + False @@ -6639,7 +6639,7 @@ MIME type from the list MIME type from the list True GTK_RELIEF_NONE - True + False @@ -6780,7 +6780,7 @@ pattern to the list pattern to the list True GTK_RELIEF_NONE - True + False @@ -6812,7 +6812,7 @@ file name pattern from the list True GTK_RELIEF_NONE - True + False @@ -8038,7 +8038,7 @@ MB Stop finding files True GTK_RELIEF_NONE - True + False @@ -8066,7 +8066,7 @@ MB Find the files True GTK_RELIEF_NONE - True + False