master b698abac508: ; Fix conversions in format.el (bug#64928)

[Ulrich Müller]

branch: master
commit b698abac50801c20b253b1f03f39226b64ed6c7b
Author: Ulrich Müller <ulm@gentoo.org>
Commit: Ulrich Müller <ulm@gentoo.org>

    ; Fix conversions in format.el (bug#64928)
    
    * lisp/format.el (format-alist): Fix duden and de646 conversions.
---
 lisp/format.el | 11 ++++++++---
 1 file changed, 8 insertions(+), 3 deletions(-)

diff --git a/lisp/format.el b/lisp/format.el
index b2dba16659b..20c25b0b937 100644
--- a/lisp/format.el
+++ b/lisp/format.el
@@ -87,11 +87,16 @@
           rot13-region rot13-region t nil)
     (duden ,(purecopy "Duden Ersatzdarstellung")
           nil
-          ,(purecopy "diac") iso-iso2duden t nil)
+          ;; FROM-FN used to call the "diac" command which is not widely
+          ;; available and apparently not under a free software license:
+          ;; https://tug.ctan.org/support/umlaut_tex.txt
+          ;; Reliable round-trip conversion is not possible anyway
+          ;; and would be by heuristic method, so use nil for now.
+          nil iso-iso2duden t nil)
     (de646 ,(purecopy "German ASCII (ISO 646)")
           nil
-          ,(purecopy "recode -f iso646-ge:latin1")
-          ,(purecopy "recode -f latin1:iso646-ge") t nil)
+          ,(purecopy "iconv -f iso646-de -t utf-8")
+          ,(purecopy "iconv -f utf-8 -t iso646-de") t nil)
     (denet ,(purecopy "net German")
           nil
           iso-german iso-cvt-read-only t nil)