1. Shlomi Fish
  2. perl-Mail-LMLM

Commits

shl...@52c325ad-5fd0-0310-8a0f-c43feede02cc  committed 7438c04

Correct the google groups mailing list homepage

  • Participants
  • Parent commits 02cbb11
  • Branches default

Comments (0)

Files changed (2)

File modules/Mail-LMLM/Changes

View file
+    - Correct the Google groups' mailing list homepage.
+
 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.

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

View file
 
     my $args = shift;
 
-    $self->{'homepage'} = "http://groups.google.com/group/";
 
     $args = $self->SUPER::parse_args($args);
     
         }
     }
 
+    $self->{'google_homepage'} =
+        "http://groups.google.com/group/" . $self->get_group_base(). "/";
+
+    $self->{'homepage'} = $self->{'google_homepage'};
+
     return \@left;
 }
 
     }
     else
     {
-        return $self->{'homepage'} . $self->get_group_base(). "/";
+        return $self->{'google_homepage'};
     }
-        
 }
 
 sub group_form