Archaic Perl(perliscope.blogspot.com)

  <%  reflections = item.class.reflections.select {|key, val| [ :has_one, :has_many, :belongs_to, :has_and_belongs_to_many ].include?(val.macro) }.to_array
	  reflections.each do |key,val| 
		 if ! reject.include?(key)
  %>
			  <h1> <%= key.to_s %></h1>
			  <% bullet_pts = item.send(key).to_array 
				 if bullet_pts.empty?
			   %>
					 <span style="padding-left:25px;"><i>none</i></span>
			   <% else  %>

					 <ul>
						 <% bullet_pts.sort_by {|x| x.methods.include?(:name) ? x.name : 0}.each do |subitem| %>
							 <li><%= linktext = subitem.respond_to?(:name) ? subitem.name : (subitem.respond_to?(:text) ? subitem.text : subitem.id )
								 # TJICFIX P3: this is an ugly way to specify a link.  do it better!
								 link_to(linktext, :controller => subitem.class.to_s.pluralize.underscore, :action=>:show, :id =>subitem.id) + "<br>" %>
						 <% end %>
					 </ul>
  <%
				end # if "none" else "lots!"
		end # if ... reject
  end # reflections.each
  %>

  <%= render (:partial => 'admin/shared/show_basicdata', :locals => { :item => @item })  %>
  <%= render (:partial => 'admin/shared/show_relations', :locals => { :item => @item, :reject => [:category_courses] })  %>