diff --git a/tests/tex-output/minimalinitialwidth/aeterne.gabc b/tests/tex-output/minimalinitialwidth/aeterne.gabc
new file mode 100644
index 00000000..ac0143ab
--- /dev/null
+++ b/tests/tex-output/minimalinitialwidth/aeterne.gabc
@@ -0,0 +1,4 @@
+name: Aterne rerum conditor (incipit);
+mode: 3;
+%%
+(c4)Æ(ed)tér(g)ne(hj) re(j)rum(ij) cón(k)di(j)tor,(ih) (,)
diff --git a/tests/tex-output/minimalinitialwidth/beata.gabc b/tests/tex-output/minimalinitialwidth/beata.gabc
new file mode 100644
index 00000000..3aba7a13
--- /dev/null
+++ b/tests/tex-output/minimalinitialwidth/beata.gabc
@@ -0,0 +1,4 @@
+name: Beata es, Maria (incipit);
+mode: 8;
+%%
+(c4) Be(g)a(gj)ta(hg) es,(h) Ma(f)ri(gh)a,(go@hv) *(,)
diff --git a/tests/tex-output/minimalinitialwidth/iam.gabc b/tests/tex-output/minimalinitialwidth/iam.gabc
new file mode 100644
index 00000000..027babbf
--- /dev/null
+++ b/tests/tex-output/minimalinitialwidth/iam.gabc
@@ -0,0 +1,4 @@
+name: Iam, bone pastor (incipit);
+mode: 4;
+%%
+(c4)Iam,(efe) bo(dc)ne(dfd) pa(e)stor,(e) (,)
diff --git a/tests/tex-output/minimalinitialwidth/magnificat.gabc b/tests/tex-output/minimalinitialwidth/magnificat.gabc
new file mode 100644
index 00000000..937dd394
--- /dev/null
+++ b/tests/tex-output/minimalinitialwidth/magnificat.gabc
@@ -0,0 +1,4 @@
+name: Magnificat (incipit);
+mode: 1;
+%%
+(c4) Ma(cd)gni(ixdh'!iv)fi(h)cat(h.) *(,)
diff --git a/tests/tex-output/minimalinitialwidth/minimalinitialwidth.tex b/tests/tex-output/minimalinitialwidth/minimalinitialwidth.tex
new file mode 100644
index 00000000..06b7ec6f
--- /dev/null
+++ b/tests/tex-output/minimalinitialwidth/minimalinitialwidth.tex
@@ -0,0 +1,47 @@
+%notes: tests minimalinitialwidth
+\documentclass[11pt]{article}
+\usepackage{graphicx}
+\usepackage{fontspec}
+\usepackage[debug=all,allowdeprecated=false]{gregoriotex}
+\setmainfont[
+    Path = ../../../fonts/ ,
+    Extension = .otf ,
+    UprightFont = *-Regular ,
+    UprightFeatures = { SmallCapsFont = *SC-Regular } ,
+    BoldFont = *-Bold ,
+    BoldFeatures = { SmallCapsFont = *SC-Bold } ,
+    ItalicFont = *-Italic ,
+    ItalicFeatures = { SmallCapsFont = *SC-Italic } ,
+    BoldItalicFont = *-BoldItalic ,
+    BoldItalicFeatures = { SmallCapsFont = *SC-BoldItalic } ,
+    Ligatures = TeX
+]{Alegreya}
+\newcommand{\minimumwidth}{1cm}
+\grechangedim{minimalinitialwidth}{\minimumwidth}{scalable}%
+\makeatletter
+\newcommand{\initialbox}{%
+    \noindent%
+    \hbox to \gre@space@dimen@beforeinitialshift{\hfil}%
+    \fbox{\hspace{\minimumwidth}}%
+}
+\newcommand{\score}[1]{%
+    \initialbox
+
+    \gregorioscore[a]{#1}%
+}
+\makeatother
+\begin{document}
+\score{iam}
+\score{beata}
+\score{oportet}
+\score{magnificat}
+\score{aeterne}
+\pagebreak
+\grechangedim{manualinitialwidth}{\minimumwidth}{scalable}%
+\score{iam}
+\score{beata}
+\score{oportet}
+\score{magnificat}
+\score{aeterne}
+\initialbox
+\end{document}
diff --git a/tests/tex-output/minimalinitialwidth/oportet.gabc b/tests/tex-output/minimalinitialwidth/oportet.gabc
new file mode 100644
index 00000000..adf3b2f7
--- /dev/null
+++ b/tests/tex-output/minimalinitialwidth/oportet.gabc
@@ -0,0 +1,4 @@
+name: Oportet te fili gaudere (incipit);
+mode: 8;
+%%
+(c4) O(g)por(j)tet(h) te(g.) *() fi(h)li(f) gau(h)de(g.)re,(g.) (;)