Fix referencing chapter

Author: flavio20002

example/example.typ

@@ -19,7 +19,7 @@
   listOfFigureTitle: "List of Figures",
   listOfTableTitle: "List of Tables",
   supplementChapter: "Chapter",
-  supplementPart: "PART",
+  supplementPart: "Part",
   part_style: 0,
   copyright: [
     Copyright © 2023 Flavio Barisi
@@ -39,9 +39,9 @@
   ]
 )
 
-#part("Part One Title")
+#part("Part One Title") 
 
-#chapter("Sectioning Examples", image: image("./orange2.jpg"))
+#chapter("Sectioning Examples", image: image("./orange2.jpg"), l: "chap1")
 #index("Sectioning")
 
 == Section Title
@@ -144,6 +144,10 @@ Lists are useful to present information in a concise and/or ordered way.
 == Ligatures 
 fi fj fl ffl ffi Ty
 
+== Referencing Chapters
+#index("Referencing")
+This statement references to another chapter @chap1
+
 #part("Part Two Title")
 
 #chapter("Mathematics", image: image("./orange2.jpg"))

tests/sample-book/ref03.png

@@ -19,7 +19,7 @@
   listOfFigureTitle: "List of Figures",
   listOfTableTitle: "List of Tables",
   supplementChapter: "Chapter",
-  supplementPart: "PART",
+  supplementPart: "Part",
   part_style: 0,
   copyright: [
     Copyright © 2023 Flavio Barisi
@@ -39,9 +39,9 @@
   ]
 )
 
-#part("Part One Title")
+#part("Part One Title") 
 
-#chapter("Sectioning Examples", image: image("./orange2.jpg"))
+#chapter("Sectioning Examples", image: image("./orange2.jpg"), l: "chap1")
 #index("Sectioning")
 
 == Section Title
@@ -144,6 +144,10 @@ Lists are useful to present information in a concise and/or ordered way.
 == Ligatures 
 fi fj fl ffl ffi Ty
 
+== Referencing Chapters
+#index("Referencing")
+This statement references to another chapter @chap1
+
 #part("Part Two Title")
 
 #chapter("Mathematics", image: image("./orange2.jpg"))

tests/sample-book/ref04.png

@@ -84,18 +84,22 @@
           #move(dx: -4pt, block(text(fill: mainColor, size: 6em, weight: "bold", part_state.display())))
         ]
       ]
-      #align(bottom+right, my-outline-small(title, appendix_state, part_state, part_location,part_change,part_counter, mainColor, textSize1: outlinePart, textSize2: outlineHeading1, textSize3: outlineHeading2, textSize4: outlineHeading3))
+            #align(bottom+right, my-outline-small(title, appendix_state, part_state, part_location,part_change,part_counter, mainColor, textSize1: outlinePart, textSize2: outlineHeading1, textSize3: outlineHeading2, textSize4: outlineHeading3))
     ])
 
   ]
 }
 
-#let chapter(title, image:none) = {
+#let chapter(title, image:none, l: none) = {
   pagebreak(to: "odd")
   heading_image.update(x =>
     image
   )
-  heading(level:1, title )
+  if l != none [
+    #heading(level: 1, title) #label(l)
+  ] else [
+    #heading(level: 1, title) 
+  ]
   part_change.update(x =>
     false
   )
@@ -172,7 +176,7 @@
   bodyfmt: body => [#body #h(1fr) $square$]
 ).with(numbering: none)
 
-#let project(title: "", subtitle: "", date: "", author: (), logo: none, cover: none, imageIndex:none, body, mainColor: blue,copyright: [], lang: "en", listOfFigureTitle: none, listOfTableTitle: none, supplementChapter: "Chapter", supplementPart: "PART", fontSize: 10pt, part_style: 0) = {
+#let project(title: "", subtitle: "", date: "", author: (), logo: none, cover: none, imageIndex:none, body, mainColor: blue,copyright: [], lang: "en", listOfFigureTitle: none, listOfTableTitle: none, supplementChapter: "Chapter", supplementPart: "Part", fontSize: 10pt, part_style: 0) = {
   set document(author: author, title: title)
   set text(size: fontSize, lang: lang)
   set par(leading: 0.5em)