From 6ab1b580a606e33469712b79f6598b0f15b4683c Mon Sep 17 00:00:00 2001
From: Woohyun Kang <30944771+KangWH@users.noreply.github.com>
Date: Thu, 13 Nov 2025 00:31:36 +0900
Subject: [PATCH] Add Korean support

Three styles: quotes (default), corners, angles.
---
 csquotes.def | 20 ++++++++++++++++++++
 csquotes.tex |  9 ++++++---
 2 files changed, 26 insertions(+), 3 deletions(-)

diff --git a/csquotes.def b/csquotes.def
index c98c2ea..1230085 100644
--- a/csquotes.def
+++ b/csquotes.def
@@ -182,6 +182,24 @@
   [0pt]
   {『}
   {』}
+\DeclareQuoteStyle[quotes]{korean}
+  {\textquotedblleft}
+  {\textquotedblright}
+  [0.05em]
+  {\textquoteleft}
+  {\textquoteright}
+\DeclareQuoteStyle[corners]{korean}
+  {『}
+  {』}
+  [0em]
+  {「}
+  {」}
+\DeclareQuoteStyle[angles]{korean}
+  {《}
+  {》}
+  [0em]
+  {〈}
+  {〉}
 \DeclareQuoteStyle{latvian}
   {\quotedblbase}
   {\textquotedblright}
@@ -361,6 +379,7 @@
 \DeclareQuoteAlias[swiss]{german}{swiss}
 \DeclareQuoteAlias[swiss]{german}{swissgerman}
 \DeclareQuoteAlias[guillemets]{italian}{italian}
+\DeclareQuoteAlias[quotes]{korean}{korean}
 \DeclareQuoteAlias[guillemets]{norwegian}{norwegian}
 \DeclareQuoteAlias[guillemets]{polish}{polish}
 \DeclareQuoteAlias[brazilian]{portuguese}{brazilian}
@@ -408,6 +427,7 @@
 \DeclareQuoteOption{icelandic}
 \DeclareQuoteOption{italian}
 \DeclareQuoteOption{japanese}
+\DeclareQuoteOption{korean}
 \DeclareQuoteOption{latin}
 \DeclareQuoteOption{latvian}
 \DeclareQuoteOption{lithuanian}
diff --git a/csquotes.tex b/csquotes.tex
index 1d47641..f983753 100644
--- a/csquotes.tex
+++ b/csquotes.tex
@@ -154,6 +154,7 @@ \subsection{Main Options}
     german                            & quotes, guillemets, swiss                  \\
     hungarian                         &                                            \\
     italian                           & guillemets, quotes                         \\
+    korean                            & quotes, corners, angles                    \\
     latin                             & \raggedright italianguillemets, germanquotes, germanguillemets,
                                         britishquotes, americanquotes \tabularnewline
     latvian                           &                                            \\
@@ -654,6 +655,7 @@ \section{Configuration}
     german                             & quotes, guillemets, swiss                  \\
     greek                              & --                                         \\
     italian                            & guillemets, quotes                         \\
+    korean                             & quotes, corners, angles                    \\
     latin                              & \raggedright italianguillemets, germanquotes, germanguillemets,
                                          britishquotes, americanquotes \tabularnewline
     norwegian                          & guillemets, quotes                         \\
@@ -718,9 +720,10 @@ \subsection{Defining Quote Aliases}
     french                       & french/quotes                                 & swedish      & swedish/quotes        \\
     german                       & german/quotes                                 & swiss        & german/swiss          \\
     italian                      & italian/guillemets                            & swissgerman  & german/swiss          \\
-    latin                        & latin/italianguillemets                       & UKenglish    & british               \\
-    mexican                      & spanish/mexican                               & USenglish    & american              \\
-    naustrian                    & austrian                                      & welsh        & welsh/british         \\
+    korean                       & korean/quotes                                 & UKenglish    & british               \\
+    latin                        & latin/italianguillemets                       & USenglish    & american              \\
+    mexican                      & spanish/mexican                               & welsh        & welsh/british         \\
+    naustrian                    & austrian                                                                             \\
     \bottomrule
   \end{tabularx}
   \caption[Language Aliases]{Language Aliases Defined by Default}