@@ -19,13 +19,13 @@
 
 (provide maybe-meta     ; Select from (current-metas) or default value ("") if not available
          maybe-attr     ; Return an attribute’s value or a default ("") if not available
          here-output-path
          here-id
-         series-noun    ; Retrieve noun-singular from current 'series meta, or ""
-         series-title   ; Retrieve title of series in current 'series meta, or ""
-         series-pagenode
+         series-metas-noun    ; Retrieve noun-singular from current 'series meta, or ""
+         series-metas-title   ; Retrieve title of series in current 'series meta, or ""
+         metas-series-pagenode
          invalidate-series
          make-tag-predicate
          tx-strs
          ymd->english
          ymd->dateformat
@@ -67,25 +67,25 @@
          (->output-path (apply build-path rel-path-parts))]
         [else (string->path ".")]))
 
 ;; Checks current-metas for a 'series meta and returns the pagenode of that series,
 ;; or '|| if no series is specified.
-(define (series-pagenode)
+(define (metas-series-pagenode)
   (define maybe-series (or (select-from-metas 'series (current-metas)) ""))
   (cond
     [(non-empty-string? maybe-series)
      (->pagenode (format "~a/~a.html" series-folder maybe-series))]
     [else '||]))
 
-(define (series-noun)
-  (define series-pnode (series-pagenode)) 
+(define (series-metas-noun)
+  (define series-pnode (metas-series-pagenode)) 
   (case series-pnode
     ['|| ""] ; no series specified
     [else (or (select-from-metas 'noun-singular series-pnode) "")]))
 
-(define (series-title)
-  (define series-pnode (series-pagenode)) 
+(define (series-metas-title)
+  (define series-pnode (metas-series-pagenode)) 
   (case series-pnode
     ['|| ""] ; no series specified
     [else (or (select-from-metas 'title series-pnode) "")]))
 
 ;; Generates a short ID for the current article