Changeset 2005

Show
Ignore:
Timestamp:
10/06/06 14:49:16
Author:
miyagawa
Message:

remove for: for HateBu?

Files:

Legend:

Unmodified
Added
Removed
Modified
Copied
Moved
  • sbm-xpost/trunk/sbm-xpost.cgi

    r1910 r2005  
    7575sub post_hatena { 
    7676    my $q = shift; 
    77     my $summary = join '', map "[$_]", split /\s+/, $q->param('tags'); 
     77    my $summary = join '', map "[$_]", grep !/^for:/, split /\s+/, $q->param('tags'); 
    7878    $summary .= " " . $q->param('comment') if $q->param('comment'); 
    7979    Encode::_utf8_off($summary);