 		  (= (c/read-ui  app [:system :ui :tab :value]) "data views")
 		  (c/component  admin-view-list-views  app  [:system :ui :data-sources])
 
+
+			(= (c/read-ui  app [:system :ui :tab :value]) "data queries")
+			(c/component  admin-view-list-queries  app  [:system :ui :data-sources])
 		  )
 		 ))
 

	(:use
		[webapp.framework.client.system-globals  :only  [
																										 data-views-v2
																										 ]])
   )





(c/defn-ui-component     admin-view-list-queries   [data-sources]

												 (c/div nil
																(c/h2 nil "Queries")
																(c/map-many
																	#(c/div
																		{:onClick (fn[x] (js/alert (pr-str (get  @data-queries-v2 %))))}
																		(pr-str %   ))
																	;(c/read-ui data-sources [:values])
																	;["s" "dd"]
																	(keys @data-queries-v2)
																	)
																))



