 
 
 
-
+(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)
+																	)
+																))
 
 
 

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


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

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