aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--ennu.el4
1 files changed, 2 insertions, 2 deletions
diff --git a/ennu.el b/ennu.el
index ae2dc17..3bd5f79 100644
--- a/ennu.el
+++ b/ennu.el
@@ -145,10 +145,10 @@ last form in BODY."
(defun ennu-add-tongue-suffix (filename tongue)
(pcase tongue
("en" filename)
- (_ (format "%s.%s.%s"
+ (_ (format "%s.%s%s"
(file-name-sans-extension filename)
tongue
- (file-name-extension filename)))))
+ (file-name-extension filename t)))))
(defun ennu-index-filename (filename-prefix tongue &optional extension page-number)
(let ((extension (if extension (concat "." extension) "")))