Changeset 1259
- Timestamp:
- 08/10/06 02:38:36
- Files:
-
- trunk/plagger (modified) (previous)
- trunk/plagger/assets/plugins/Filter-EntryFullText/sixapart.pl (modified) (1 diff)
Legend:
- Unmodified
- Added
- Removed
- Modified
- Copied
- Moved
trunk/plagger/assets/plugins/Filter-EntryFullText/sixapart.pl
r1056 r1259 8 8 sub extract { 9 9 my($self, $args) = @_; 10 my $body = ($args->{content} =~ m!<div class="entry -body(?:-text)?">(.*?)</div>!s)[0];11 if ($body && ($args->{content} =~ m!<div (?:id="\w+" )?class="entry -more(?:-text)?">(.*?)</div>!s)[0]) {10 my $body = ($args->{content} =~ m!<div class="entry[_-]body(?:[_-]text)?">(.*?)</div>!s)[0]; 11 if ($body && ($args->{content} =~ m!<div (?:id="\w+" )?class="entry[_-]more(?:[_-]text)?">(.*?)</div>!s)[0]) { 12 12 $body .= $1; 13 13 }
