Jump to content

Translations:KMail/Tools/40/da: Difference between revisions

From KDE UserBase Wiki
Claus chr (talk | contribs)
No edit summary
Claus chr (talk | contribs)
No edit summary
 
Line 1: Line 1:
!!FUZZY!!{{Input|1=#!/usr/bin/perl
{{Input|1=#!/usr/bin/perl
     $endOfHeader = 0;
     $endOfHeader = 0;
     while (<>) {
     while (<>) {

Latest revision as of 15:59, 27 September 2010

Information about message (contribute)
This message has no documentation. If you know where or how this message is used, you can help other translators by adding documentation to this message.
Message definition (KMail/Tools)
{{Input|1=#!/usr/bin/perl
   $endOfHeader = 0;
   while (<>) {
       if ( $endOfHeader == 0 )
       {
           if ( /^(?i:Subject):\s+Bug\#(\d{4,5}):/ )
           {
               $_ = "Reply-To: $1\@bugs.kde.org\n".$_;
           }
           elsif ( /^$/ )
           {
               $endOfHeader = 1;
           }
       }
       print;
   };
}}
#!/usr/bin/perl
    $endOfHeader = 0;
    while (<>) {
        if ( $endOfHeader == 0 )
        {
            if ( /^(?i:Subject):\s+Bug\#(\d{4,5}):/ )
            {
                $_ = "Reply-To: $1\@bugs.kde.org\n".$_;
            }
            elsif ( /^$/ )
            {
                $endOfHeader = 1;
            }
        }
        print;
    };