From 2cd558f67f44cca787013c02b665533b97c90f0e Mon Sep 17 00:00:00 2001
From: Ralph Amissah <ralph@amissah.com>
Date: Mon, 3 Sep 2007 21:46:47 +0100
Subject: sisu-0.58 work towards making it possible to describe sisu and sisu
 markup within sisu

---
 lib/sisu/v0/html_scroll.rb | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

(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 b2cfb497..629cfc0c 100644
--- a/lib/sisu/v0/html_scroll.rb
+++ b/lib/sisu/v0/html_scroll.rb
@@ -88,7 +88,8 @@ module SiSU_HTML_scroll
         end
         @rcdc=true if @rcdc==false and (para =~/^\d~metadata/ or para =~/^1~\s+Document Information/)
         if para !~/(^0~|<ENDNOTES>|<EOF>)/
-          para.gsub!(/~[{\[].+?[}\]]~\s+/m,' ')
+          unless para =~/^<:code>/; para.gsub!(/~[{\[].+?[}\]]~\s+/m,' ')
+          end
           if para =~/.+?<~\d+;(?:[oh]|[0-6]:)\d+;\w\d+><#@dp:#@dp>$/
             paranum=para[/.+?<~(\d+);(?:[oh]|[0-6]:)\d+;\w\d+><#@dp:#@dp>$/,1]
             @p_num=SiSU_HTML_Format_type::Paragraph_number.new(@md,paranum)
-- 
cgit v1.2.3