omf_web 0.9.9 → 1.0.0

data/lib/omf-web/widget/text/maruku/helpers.rb

@@ -2,17 +2,17 @@
 #   Copyright (C) 2006  Andrea Censi  <andrea (at) rubyforge.org>
 #
 # This file is part of Maruku.
-# 
+#
 #   Maruku is free software; you can redistribute it and/or modify
 #   it under the terms of the GNU General Public License as published by
 #   the Free Software Foundation; either version 2 of the License, or
 #   (at your option) any later version.
-# 
+#
 #   Maruku is distributed in the hope that it will be useful,
 #   but WITHOUT ANY WARRANTY; without even the implied warranty of
 #   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 #   GNU General Public License for more details.
-# 
+#
 #   You should have received a copy of the GNU General Public License
 #   along with Maruku; if not, write to the Free Software
 #   Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA  02110-1301  USA
@@ -21,7 +21,7 @@
 
 
 
-# A series of helper functions for creating elements: they hide the 
+# A series of helper functions for creating elements: they hide the
 # particular internal representation.
 #
 # Please, always use these instead of creating MDElement.
@@ -32,7 +32,7 @@ module Helpers
 
 	# if the first is a md_ial, it is used as such
 	def md_el(node_type, children=[], meta={}, al=nil)
-		if  (e=children.first).kind_of?(MDElement) and 
+		if  (e=children.first).kind_of?(MDElement) and
 			e.node_type == :ial then
 			if al
 				al += e.ial
@@ -40,7 +40,7 @@ module Helpers
 				al = e.ial
 			end
 			children.shift
-		end 
+		end
 		e = MDElement.new(node_type, children, meta, al)
 		e.doc = @doc
 		return e
@@ -49,7 +49,7 @@ module Helpers
 	def md_header(level, children, al=nil, line_no = -1)
 		md_el(:header, children, {:level => level, :line_no => line_no}, al)
 	end
-	
+
 	# Inline code
 	def md_code(code, al=nil)
 		md_el(:inline_code, [], {:raw_code => code}, al)
@@ -79,7 +79,7 @@ module Helpers
 	def md_abbr(abbr, title)
 		md_el(:abbr, [abbr], {:title=>title})
 	end
-	
+
 	def md_html(raw_html, al=nil)
 		e = md_el(:raw_html, [], {:raw_html=>raw_html})
 		begin
@@ -87,7 +87,7 @@ module Helpers
 			# end end of string, or else REXML gets confused
 			raw_html = raw_html.gsub(/\A\s*</,'<').
 			                    gsub(/>[\s\n]*\Z/,'>')
-			
+
 			raw_html = "<marukuwrap>#{raw_html}</marukuwrap>"
 			e.instance_variable_set :@parsed_html,
 			 	REXML::Document.new(raw_html)
@@ -99,19 +99,21 @@ module Helpers
 		end
 		e
 	end
-		
+
 	def md_link(children, ref_id, al=nil)
+    #puts "LINK>>> '#{ref_id}'"
 		md_el(:link, children, {:ref_id=>ref_id.downcase}, al)
 	end
-	
+
 	def md_im_link(children, url, title=nil, al=nil)
+	  #puts "IM_LINK>>> '#{url}'"
 		md_el(:im_link, children, {:url=>url,:title=>title}, al)
 	end
-	
+
 	def md_image(children, ref_id, al=nil)
 		md_el(:image, children, {:ref_id=>ref_id}, al)
 	end
-	
+
 	def md_im_image(children, url, title=nil, al=nil)
 		md_el(:im_image, children, {:url=>url,:title=>title},al)
 	end
@@ -138,24 +140,25 @@ module Helpers
 
 	# <http://www.example.com/>
 	def md_url(url, al=nil)
+	  #puts "URL>>> '#{url}'"
 		md_el(:immediate_link, [], {:url=>url}, al)
 	end
-	
+
 	# <andrea@rubyforge.org>
 	# <mailto:andrea@rubyforge.org>
 	def md_email(email, al=nil)
 		md_el(:email_address, [], {:email=>email}, al)
 	end
-	
+
 	def md_entity(entity_name, al=nil)
 		md_el(:entity, [], {:entity_name=>entity_name}, al)
 	end
-	
+
 	# Markdown extra
 	def md_foot_ref(ref_id, al=nil)
 		md_el(:footnote_reference, [], {:footnote_id=>ref_id}, al)
 	end
-	
+
 	def md_par(children, al=nil, line_no = -1)
 		#md_el(:paragraph, children, meta={}, al)
 		md_el(:paragraph, children, {:line_no => line_no}, al)
@@ -168,10 +171,10 @@ module Helpers
 		meta[:title] = title if title
 		md_el(:ref_definition, [], meta, al)
 	end
-	
+
 	# inline attribute list
 	def md_ial(al)
-		al = Maruku::AttributeList.new(al) if 
+		al = Maruku::AttributeList.new(al) if
 			not al.kind_of?Maruku::AttributeList
 		md_el(:ial, [], {:ial=>al})
 	end
@@ -180,7 +183,7 @@ module Helpers
 	def md_ald(id, al)
 		md_el(:ald, [], {:ald_id=>id,:ald=>al})
 	end
-	
+
 	# Server directive <?target code... ?>
 	def md_xml_instr(target, code)
 		md_el(:xml_instr, [], {:target=>target, :code=>code})
@@ -191,10 +194,10 @@ end
 
 module MaRuKu
 
-class MDElement	
+class MDElement
 	# outputs abbreviated form  (this should be eval()uable to get the document)
-	def inspect2 
-		s = 
+	def inspect2
+		s =
 		case @node_type
 		when :paragraph
 			"md_par(%s)" % children_inspect
@@ -208,7 +211,7 @@ class MDElement
 			"md_code(%s)" % self.raw_code.inspect
 		when :raw_html
 			"md_html(%s)" % self.raw_html.inspect
-		when :emphasis 
+		when :emphasis
 			"md_em(%s)" % children_inspect
 		when :strong
 			"md_strong(%s)" % children_inspect
@@ -216,11 +219,11 @@ class MDElement
 			"md_url(%s)" % self.url.inspect
 		when :image
 			"md_image(%s, %s)" % [
-				children_inspect, 
+				children_inspect,
 				self.ref_id.inspect]
 		when :im_image
 			"md_im_image(%s, %s, %s)" % [
-				children_inspect, 
+				children_inspect,
 				self.url.inspect,
 				self.title.inspect]
 		when :link
@@ -228,13 +231,13 @@ class MDElement
 					children_inspect, self.ref_id.inspect]
 		when :im_link
 				"md_im_link(%s, %s, %s)" % [
-					children_inspect, 
+					children_inspect,
 					self.url.inspect,
 					self.title.inspect,
 				]
 		when :ref_definition
 			"md_ref_def(%s, %s, %s)" % [
-					self.ref_id.inspect, 
+					self.ref_id.inspect,
 					self.url.inspect,
 					self.title.inspect
 				]
@@ -243,12 +246,12 @@ class MDElement
 		else
 			return nil
 		end
-		if @al and not @al.empty? then 
+		if @al and not @al.empty? then
 			s = s.chop + ", #{@al.inspect})"
 		end
 		s
 	end
-	
+
 end
 
 end