Re: patch for latin-pre (german-pre) add german quotes

Uwe Brauer <[email protected]> Sun, 10 Aug 2014 09:31:36 +0200
Newsgroups gmane.emacs.xemacs.patches
Message-ID <[email protected]>
>> "Stephen" == Stephen J Turnbull <[email protected]> writes:

   > Uwe Brauer writes:
   >> diff -u
   >> /usr/local/share/xemacs/mule-packages/lisp/leim/quail/latin-pre.el
   >> /home/oub/xemacs/site-lisp/versch/quail-new/latin-pre.el


[snip]


   > More important is that lines that didn't change AFAICT are present in
   > the diff, for example the lines for acute in the table below. 

Yes I found this surprising myself.

   > It appears that *all* lines containing non-ASCII characters have
   > gotten this treatment. Have you saved the new code as UTF-8 or
   > something like that?

Not really, when I apply 
(describe-current-coding-system) in the new latin-pre.el I 
obtain:

Coding system for saving this buffer:
  CText -- ctext-unix
Default coding system (for new files):
  UTF8 -- utf-8
Coding system for keyboard input:
  UTF8 -- utf-8
Coding system for terminal output:
  UTF8 -- utf-8

However I have also the setting 
 		   (setq default-process-coding-system '(utf-8))
 		   (set-coding-priority-list '(utf-8))
 		   (set-coding-category-system 'utf-8 'utf-8)
 		   (setq default-network-coding-system '(utf-8 . utf-8))

And more importantly the file was open when I applied diff. I closed the
file and applied diff again and now everything looks alright. Sorry for
the inconvenience.

_______________________________________________
XEmacs-Patches mailing list
[email protected]
http://lists.xemacs.org/mailman/listinfo/xemacs-patches
latin-pre.patch (application/octet-stream, 876 B)
--- latin-pre.el	2014-08-09 14:16:55.113725578 +0200
+++ /usr/local/share/xemacs/mule-packages/lisp/leim/quail/latin-pre.el	2010-02-19 15:51:16.000000000 +0100
@@ -276,12 +276,11 @@
  ("/ " ?/)
  )
 
-
 (quail-define-package
  "german-prefix" "Latin-1" "DE>" t
  "German (Deutsch) input method with prefix modifiers
 Key translation rules are:
- \"A -> ,AD(B -> \"O -> ,AV(B, \"U -> ,A\(B, \"s -> ?,A_(B \"' -> ,f5(B \"` -> ,f%(B \"\" -> %G“%@
+ \"A -> ,AD(B -> \"O -> ,AV(B, \"U -> ,A\(B, \"s -> ?,A_(B
 " nil t nil nil nil nil nil nil nil nil t)
 
 (quail-define-rules
@@ -291,14 +290,10 @@
  ("\"a" ?,Ad(B)
  ("\"o" ?,Av(B)
  ("\"u" ?,A|(B)
- ("\"`" ?,f%(B)
- ("\"'" ?,f5(B)
- ("\"\"" ?%G“%@)
  ("\"s" ?,A_(B)
  ("\" " ?\")
 )
 
-
 (quail-define-package
  "irish-prefix" "Latin-1" "GA>" t
  "Irish input method with prefix modifiers