TDS の # の処理

「行頭 # がコメント」なのはスクリプトの引用とかで使いにくいので、行頭 # あっても構わず表示するようにした

--- 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");
     }