From: rubikitch <rubikitch@...>
Date: 2000-12-08T15:04:52+09:00
Subject: [ruby-list:26433] [RD]rd2html HeadLine patch

るびきちです。

=begin
========== キリトリ ==========
=end

などで変なHTMLを吐くのを防ぐ一行パッチです。
ParseErrorでよいのかはちょっと不安。

--- /usr/local/lib/ruby/site_ruby/1.4/rd/rd2html-lib.rb	Thu Dec  7 22:21:48 2000
+++ /home/takashi/ruby/rd/rd2html-lib.rb	Fri Dec  8 14:58:23 2000
@@ -79,6 +79,7 @@
     end
     
     def apply_to_Headline(element, title)
+      raise ParseError unless element.level &&  element.level <= 6
       anchor = refer(element)
       %Q[<H#{element.level}><A NAME="#{anchor}">#{title}</A>] +
       %Q[</H#{element.level}><!-- RDLabel: "#{element.label}" -->\n]