- (if (not (and (= (chain-assoc-get 'page:page-number props -1) 1)
- (chain-assoc-get 'page:last? props -1)))
- (interpret-markup layout props arg)
- empty-stencil))
+ (if (not (and (= (chain-assoc-get 'page:page-number props -1)
+ (ly:output-def-lookup layout 'first-page-number))
+ (chain-assoc-get 'page:last? props -1)))
+ (interpret-markup layout props arg)
+ empty-stencil))
+
+#(define (create-page-number-stencil layout props arg)
+ (if (eq? (ly:output-def-lookup layout 'print-page-number) #t)
+ (interpret-markup layout props arg)
+ empty-stencil))
+
+#(define (print-page-number-check-first layout props arg)
+ (if (or (not (= (chain-assoc-get 'page:page-number props -1)
+ (ly:output-def-lookup layout 'first-page-number)))
+ (eq? (ly:output-def-lookup layout 'print-first-page-number) #t))
+ (create-page-number-stencil layout props arg)
+ empty-stencil))