quirks

lisp/recently-updated.el

@@ -26,7 +26,8 @@
 
 (defun z/recent-omit-org-p (rel-org)
   "Return non-nil if REL-ORG (relative to site root) should be excluded."
-  (let ((name (file-name-nondirectory rel-org)))
+  (let ((name (file-name-nondirectory rel-org))
+        (full (expand-file-name rel-org z/site-root)))
     (or
      ;; Static asset directories
      (string-prefix-p "assets/" rel-org)
@@ -36,6 +37,8 @@
      (string-match-p  "/tags/" rel-org)
      ;; Known generated files
      (member name z/recent-omit-names)
+     ;; Deliberately discoverable only by hidden interactions.
+     (z/hidden-page-p full)
      ;; Any *-list.org sitemaps
      (string-match-p "-list\\.org\\'" name))))