From 2d7b1bfe556bbc0e493545f271105608000af8a5 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?tr=C3=A9meur?= <git@praze.net>
Date: Tue, 28 May 2024 18:47:36 +0100
Subject: [PATCH] Stop line breaks between en dashes and closing quote marks in
 fic PDFs

---
 custom/fic.el | 3 +++
 1 file changed, 3 insertions(+)

diff --git a/custom/fic.el b/custom/fic.el
index 05925d8..b984311 100644
--- a/custom/fic.el
+++ b/custom/fic.el
@@ -147,6 +147,9 @@
       (goto-char (point-min))
       (while (re-search-forward "label{\\(.*\\)}\n«~\\([A-Z]\\)\\([a-z]*\\)" nil t)
 	(replace-match "label{\\1}\n\\\\lettrine{«~\\2}{\\3}"))
+      (goto-char (point-min))
+      (while (re-search-forward "~–”" nil t)
+        (replace-match "\\\\mbox{~–”}"))
       (if ffx
 	  (progn
 	    (goto-char (point-min))