From a2130055009ddc805a6c2f31309868e75d5fe9b7 Mon Sep 17 00:00:00 2001
From: Ralph Amissah <ralph@amissah.com>
Date: Wed, 26 May 2010 12:54:18 -0400
Subject: dal (syntax, doc_str, numbering) add internal document link to tagged
 point (including ocn)

---
 lib/sisu/v2/dal_doc_str.rb | 5 +++--
 1 file changed, 3 insertions(+), 2 deletions(-)

(limited to 'lib/sisu/v2/dal_doc_str.rb')

diff --git a/lib/sisu/v2/dal_doc_str.rb b/lib/sisu/v2/dal_doc_str.rb
index a250175b..e35baf5a 100644
--- a/lib/sisu/v2/dal_doc_str.rb
+++ b/lib/sisu/v2/dal_doc_str.rb
@@ -98,7 +98,7 @@ module SiSU_document_structure_extract
     def endnote_test?(str)
       bool=((str=~/~\{.+?\}~|~\[.+?\]~/) ? true : false)
     end
-    def extract_tags(str)
+    def extract_tags(str,nametag=nil)
       tags=[]
       if str.nil?
       else
@@ -109,6 +109,7 @@ module SiSU_document_structure_extract
           tags=str.scan(/#{Mx[:tag_o]}(\S+?)#{Mx[:tag_c]}/).flatten
           str.gsub!(/[ ]?#{Mx[:tag_o]}\S+?#{Mx[:tag_c]}[ ]?/,' ') #may be issues with spaces would leave one, but "code" blocks?
         end
+        tags=nametag ? (tags << nametag) : tags
       end
       [str,tags]
     end
@@ -164,7 +165,7 @@ module SiSU_document_structure_extract
             elsif t_o=~/^:?[A-C1-6]\~(\S+)\s+(.+)/
               name,obj=$1,$2
               note=endnote_test?(obj)
-              obj,tags=extract_tags(obj)
+              obj,tags=extract_tags(obj,name)
               h={:lv=>lv,:name=>name,:obj=>obj,:idx=>idx,:tags=>tags}
               SiSU_document_structure::Object_heading.new.heading(h)
             else nil
-- 
cgit v1.2.3