--- Parser.pm- Wed Jun 19 16:24:14 2002 +++ lib/TDS/Tdf/Parser.pm Wed Jun 19 16:24:27 2002 @@ -401,14 +401,6 @@ $pos = $self->end($pos->Name); $self->in_autolist(0); } -# } elsif ($$type ne "block" && !$pos->opt->{as_multiline}){ - } elsif (!$self->noparse && $text =~ /^\#\#/){ # /^\##/ do NOT anything - return undef; - } elsif (!$self->noparse && $text =~ /^\#(.*)/){ # comment line - my $comment = new TDS::Tdf::Command::COMMENT; - $comment->PushContent($1); - $pos->PushContent($comment->AsHTML); - return; } elsif (!$$allowed{'Inline'}){ # && !$pos->opt->{as_multiline}){ $pos = $self->top->InsertCommand("P"); }
TDS の # の処理
「行頭 # がコメント」なのはスクリプトの引用とかで使いにくいので、行頭 # あっても構わず表示するようにした