From 3f282d767483807e33d4d1611056a005cdd68ff5 Mon Sep 17 00:00:00 2001 From: Ralph Amissah Date: Wed, 26 Sep 2007 23:43:31 +0100 Subject: matches to take account of internal new naming/tagging of "document information" heading 1~meta --- lib/sisu/v0/html_scroll.rb | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'lib/sisu/v0/html_scroll.rb') diff --git a/lib/sisu/v0/html_scroll.rb b/lib/sisu/v0/html_scroll.rb index 629cfc0c..30640f30 100644 --- a/lib/sisu/v0/html_scroll.rb +++ b/lib/sisu/v0/html_scroll.rb @@ -80,13 +80,13 @@ module SiSU_HTML_scroll @rcdc=false @scr={ :body=>[],:metadata=>[],:owner_details=>[] } data.each do |para| - if para =~/^\d~\s+Document Information/ + if para =~/^\d~meta\s+Document Information/ para.gsub!(/(Document Information(?: \(metadata\))?)/,'\1') end if para =~/^\d~metadata\s+Metadata/ para.gsub!(/(Metadata)/,'\1') end - @rcdc=true if @rcdc==false and (para =~/^\d~metadata/ or para =~/^1~\s+Document Information/) + @rcdc=true if @rcdc==false and (para =~/^\d~metadata/ or para =~/^1~meta\s+Document Information/) if para !~/(^0~||)/ unless para =~/^<:code>/; para.gsub!(/~[{\[].+?[}\]]~\s+/m,' ') end -- cgit v1.2.3