Morten Brix Pedersen 24 лет назад
Родитель
Сommit
0719ef1df8
2 измененных файлов с 4 добавлено и 0 удалено
  1. 2 0
      docs/Changelog
  2. 2 0
      modules/Pisg/Parser/Format/Trillian.pm

+ 2 - 0
docs/Changelog

@@ -16,6 +16,8 @@ pisg (x.xx)
      - ShowMostActiveByHourGraph
      - ActiveNicksByHour
      (thanks, Gissehel <gissehel-pisggene@giss.mine.nu>)
+   * A problem with links in trillian log formats has been fixed (thanks,
+     Hanno Hecker <hanno-pisg@bee.de>)
 
 pisg (0.38) - Thu Apr, 25th 2002
    * Grammar fixes in documentation (thanks, Azhrarn <diablo2@krock.com>)

+ 2 - 0
modules/Pisg/Parser/Format/Trillian.pm

@@ -29,6 +29,7 @@ sub normalline
         $hash{hour}   = $1;
         $hash{nick}   = remove_prefix($2);
         $hash{saying} = $3;
+        $hash{saying} =~ s/\(Link: ((http|https|ftp|telnet|news):\/\/.*?)\)\1/$1/;
 
         return \%hash;
     } else {
@@ -46,6 +47,7 @@ sub actionline
         $hash{hour}   = $1;
         $hash{nick}   = remove_prefix($2);
         $hash{saying} = $3;
+        $hash{saying} =~ s/\(Link: ((http|https|ftp|telnet|news):\/\/.*?)\)\1/$1/;
 
         return \%hash;
     } else {