[pkgsrc/trunk]: pkgsrc/editors/mule-ucs Fix our lisp patch. I've checked buil...

[cjep <cjep%pkgsrc.org@localhost>]

details:   https://anonhg.NetBSD.org/pkgsrc/rev/f58efb33ab47
branches:  trunk
changeset: 537015:f58efb33ab47
user:      cjep <cjep%pkgsrc.org@localhost>
date:      Tue Jan 01 19:54:27 2008 +0000

description:
Fix our lisp patch. I've checked building this package with both emacs20
and emacs21. Addresses PR#30131.

diffstat:

 editors/mule-ucs/distinfo         |  4 ++--
 editors/mule-ucs/patches/patch-aa |  8 ++++----
 2 files changed, 6 insertions(+), 6 deletions(-)

diffs (36 lines):

diff -r 50052e32e12f -r f58efb33ab47 editors/mule-ucs/distinfo
--- a/editors/mule-ucs/distinfo Tue Jan 01 16:45:35 2008 +0000
+++ b/editors/mule-ucs/distinfo Tue Jan 01 19:54:27 2008 +0000
@@ -1,7 +1,7 @@
-$NetBSD: distinfo,v 1.4 2005/02/23 17:15:11 agc Exp $
+$NetBSD: distinfo,v 1.5 2008/01/01 19:54:27 cjep Exp $
 
 SHA1 (Mule-UCS-0.84.tar.gz) = aa796d3d9cce8b3c444752e8a3fc74ecf3d76979
 RMD160 (Mule-UCS-0.84.tar.gz) = 48ac2119998b8df052d5f8835de396f32e0337ab
 Size (Mule-UCS-0.84.tar.gz) = 565222 bytes
-SHA1 (patch-aa) = 12ea72b6549e643c438171cc1ef2107d051e6ca6
+SHA1 (patch-aa) = 7e9a447fcbfa87b63fcdbfe5a49a2e3d1c99f0d4
 SHA1 (patch-ab) = aff0bcad70ef62a32409cba3f6e2e052993617c3
diff -r 50052e32e12f -r f58efb33ab47 editors/mule-ucs/patches/patch-aa
--- a/editors/mule-ucs/patches/patch-aa Tue Jan 01 16:45:35 2008 +0000
+++ b/editors/mule-ucs/patches/patch-aa Tue Jan 01 19:54:27 2008 +0000
@@ -1,6 +1,6 @@
-$NetBSD: patch-aa,v 1.1 2003/03/14 01:26:41 uebayasi Exp $
+$NetBSD: patch-aa,v 1.2 2008/01/01 19:54:27 cjep Exp $
 
---- lisp/un-define.el.orig     Tue Mar  6 14:41:38 2001
+--- lisp/un-define.el.orig     2001-03-06 22:41:38.000000000 +0000
 +++ lisp/un-define.el
 @@ -610,13 +610,21 @@ by calling post-read-conversion and pre-
  
@@ -26,8 +26,8 @@
 +       (mucs-define-coding-system
 +        (nth 0 y) (nth 1 y) (nth 2 y)
 +        (nth 3 y) (nth 4 y) (nth 5 y) (nth 6 y))
-+       (coding-system-put (car y) 'alias-coding-systems (list (car x)))))
-+      (cdr x)))
++       (coding-system-put (car y) 'alias-coding-systems (list (car x))))
++      (cdr x))))
    `((utf-8
       (utf-8-unix
        ?u "UTF-8 coding system"