Add a methods to list all navigation links

lib/opds/navigation_feed.rb

@@ -1,4 +1,17 @@
 module OPDS
 	class NavigationFeed  < Feed
+		def navigation_links
+			nav_links=Support::LinkSet.new @browser
+			self.links.each do |l|
+				nav_links.push_link l if l.type=='application/atom+xml'
+			end
+
+			self.entries.each do |entry|
+				entry.links.each do |l|
+					nav_links.push_link l if l.type=='application/atom+xml'
+				end
+			end
+			nav_links
+		end
 	end
 end

lib/opds/support/linkset.rb

@@ -88,6 +88,10 @@ def push(rel,link,text=nil,type=nil, price=nil, currency=nil)
 				self[rel]=tab
 			end
 
+			def push_link(link)
+				@store.push link if link.is_a?Link
+			end
+
 			def link_url(k)
 				ty,v=k.first
 				t=remap(collection(ty)[v])
@@ -144,6 +148,10 @@ def last
 				@store.last
 			end
 
+			def to_yaml
+				@store.to_yaml
+			end
+
 			protected 
 			def collection(type)
 				case type.to_s