瀏覽代碼

fix: Sort 'Pages tagged with' list

Moritz Ulrich 3 年之前
父節點
當前提交
6c041b4fee
共有 1 個文件被更改,包括 1 次插入1 次删除
  1. 1 1
      src/main/frontend/components/page.cljs

+ 1 - 1
src/main/frontend/components/page.cljs

@@ -166,7 +166,7 @@
         (ui/foldable
          [:h2.font-bold.opacity-50 (util/format "Pages tagged with \"%s\"" tag)]
          [:ul.mt-2
-          (for [[original-name name] pages]
+          (for [[original-name name] (sort pages)]
             [:li {:key (str "tagged-page-" name)}
              [:a {:href (rfe/href :page {:name name})}
               original-name]])]