Anonymous avatar Anonymous committed 7e08fd6

Fix Google Groups - bump the version number to 0.6800.

Comments (0)

Files changed (5)

modules/Mail-LMLM/Changes

+0.6800    ( Tue Feb 23 22:56:49 IST 2010 )
+    - Fix the Google Groups behaviour. (It was completely broken beforehand).
+        - We need some t/*.t tests.
+
 0.6700    ( Tue Feb 23 22:34:27 IST 2010 )
     - Fix the building of the rpm using rpmbuild -tb Mail-LMLM-0.6600.tar.gz
 

modules/Mail-LMLM/META.yml

 provides:
   Mail::LMLM:
     file: lib/Mail/LMLM.pm
-    version: 0.6700
+    version: 0.6800
   Mail::LMLM::Object:
     file: lib/Mail/LMLM/Object.pm
   Mail::LMLM::Render:
   Test::More: 0
 resources:
   license: http://www.opensource.org/licenses/bsd-license.php
-version: 0.6700
+version: 0.6800

modules/Mail-LMLM/lib/Mail/LMLM.pm

 
 use vars qw($VERSION);
 
-$VERSION = '0.6700';
+$VERSION = '0.6800';
 
 use vars qw(@ISA);
 
 
 my $prefix = "Mail::LMLM::Types::";
 
+sub _pref
+{
+    my $name = shift;
+
+    return $prefix . $name;
+}
+
 %mailing_list_classes = 
 (
     (
-        map { $_ => $prefix . ucfirst($_) } 
+        map { $_ => _pref(ucfirst($_)) } 
         ('egroups', 'ezmlm', 'listar', 'majordomo', 'listserv', 'mailman')
     ),
-    "google" => "GoogleGroups",
+    "google" => _pref("GoogleGroups"),
 );
 
 use vars qw(@render_what);

modules/Mail-LMLM/lib/Mail/LMLM/Types/GoogleGroups.pm

     }
 }
 
+sub get_default_hostname
+{
+    return "googlegroups.com";
+}
+
+sub get_online_archive
+{
+    my $self = shift;
+
+    return $self->SUPER::get_online_archive()
+        || $self->get_maintenance_url();
+}
 1;
 
 __END__
 Render a maintenance URL. Internal method.
 
 
+=head2 get_default_hostname
+
+The default hostname. Internal method.
+
+=head2 get_online_archive
+
+The online archive. Internal method.
+
 =head1 SEE ALSO
 
 L<Mail::LMLM::Types::Base>

modules/Mail-LMLM/perl-Mail-LMLM.spec

 Name: perl-Mail-LMLM
-Version: 0.6700
+Version: 0.6800
 Release: 1
 Group: Networking/Mail
 Source: http://www.cpan.org/modules/by-authors/id/S/SH/SHLOMIF/Mail-LMLM-%{version}.tar.gz
Tip: Filter by directory path e.g. /media app.js to search for public/media/app.js.
Tip: Use camelCasing e.g. ProjME to search for ProjectModifiedEvent.java.
Tip: Filter by extension type e.g. /repo .js to search for all .js files in the /repo directory.
Tip: Separate your search with spaces e.g. /ssh pom.xml to search for src/ssh/pom.xml.
Tip: Use ↑ and ↓ arrow keys to navigate and return to view the file.
Tip: You can also navigate files with Ctrl+j (next) and Ctrl+k (previous) and view the file with Ctrl+o.
Tip: You can also navigate files with Alt+j (next) and Alt+k (previous) and view the file with Alt+o.