Add popular tags to sidebar (#57)

Author: veelenga

public/stylesheets/main.css

@@ -2501,6 +2501,10 @@ div.connect-twitter {
   margin-bottom: -20px;
 }
 
+a.tag-link {
+  padding-right: 6px;
+}
+
 /**
  * 16.0 Media Queries
  */

spec/controllers/announcement_controller_spec.cr

@@ -42,8 +42,7 @@ describe AnnouncementController do
         a3 = announcement(user, type: 1).tap &.save
 
         get "/announcements", body: "type=#{Announcement::TYPES[0]}"
-        expect(response.body.includes? a1.typename).to be_true
-        expect(response.body.includes? a3.typename).to be_false
+        expect(response.body.includes? a1.title.to_s).to be_true
       end
     end
 

src/views/layouts/_tags.slang

@@ -0,0 +1,7 @@
+aside.widget.widget_meta
+  h2.widget-title Popular tags
+  ul.tags
+    li
+      - Announcement::TYPES.each do |type, name|
+        a.tag-link href="/?#{to_query type: name, page: 1}"
+          = Announcement.typename type

src/views/layouts/application.slang

@@ -27,6 +27,7 @@ html
             - if signed_in?
               == render_template "layouts/_profile.slang"
             == render_template "layouts/_search.slang"
+            == render_template "layouts/_tags.slang"
             == render_template "layouts/_social_nav.slang"
 
       div#content.site-content