ports/83122: unbreak ginsu port for ghc-6.4

[Jason Stone]

>Number:         83122
>Category:       ports
>Synopsis:       unbreak ginsu port for ghc-6.4
>Confidential:   no
>Severity:       serious
>Priority:       low
>Responsible:    freebsd-ports-bugs
>State:          open
>Quarter:        
>Keywords:       
>Date-Required:
>Class:          maintainer-update
>Submitter-Id:   current-users
>Arrival-Date:   Fri Jul 08 02:00:34 GMT 2005
>Closed-Date:
>Last-Modified:
>Originator:     Jason Stone
>Release:        FreeBSD 5.4-PRERELEASE i386
>Organization:
>Environment:
System: FreeBSD treehorn.dfmm.org 5.4-PRERELEASE FreeBSD 5.4-PRERELEASE #0: Thu Mar 3 01:13:08 PST 2005 root at treehorn.dfmm.org:/usr/obj/usr/src/sys/JKERN i386


	
>Description:
	unbreak ginsu port for ghc-6.4
>How-To-Repeat:
	
>Fix:


diff -ruN ginsu.orig/Makefile ginsu/Makefile
--- ginsu.orig/Makefile	Sun Apr 10 14:40:49 2005
+++ ginsu/Makefile	Tue Jul  5 16:50:24 2005
@@ -6,7 +6,7 @@
 #
 
 PORTNAME=	ginsu
-PORTVERSION=	0.5.3
+PORTVERSION=	0.7.0
 CATEGORIES=	net
 MASTER_SITES=	http://repetae.net/john/computer/ginsu/drop/
 
@@ -14,8 +14,6 @@
 COMMENT=	A client for the gale secure instant messaging system
 
 BUILD_DEPENDS=	ghc:${PORTSDIR}/lang/ghc
-
-BROKEN=		Does not build
 
 GNU_CONFIGURE=	yes
 USE_GMAKE=	yes
diff -ruN ginsu.orig/distinfo ginsu/distinfo
--- ginsu.orig/distinfo	Thu Mar  4 22:00:12 2004
+++ ginsu/distinfo	Tue Jul  5 16:51:36 2005
@@ -1 +1,2 @@
-MD5 (ginsu-0.5.3.tar.gz) = 8ce4341c459aae6fe64cdc71de19ef25
+MD5 (ginsu-0.7.0.tar.gz) = ce2b4716495363e5b4264e13d03b724b
+SIZE (ginsu-0.7.0.tar.gz) = 220651
diff -ruN ginsu.orig/files/patch-aa ginsu/files/patch-aa
--- ginsu.orig/files/patch-aa	Wed Dec 31 16:00:00 1969
+++ ginsu/files/patch-aa	Wed Jul  6 02:18:46 2005
@@ -0,0 +1,29 @@
+--- CWString.hsc.orig	Wed Jul  6 02:16:58 2005
++++ CWString.hsc	Wed Jul  6 02:18:26 2005
+@@ -36,6 +36,7 @@
+ 
+ import Data.Bits
+ import Foreign.C.String(withCString,CString,CStringLen,CWString,CWStringLen)
++import qualified Foreign.C.String as FS
+ import Foreign.C.Types
+ import Char
+ import Foreign
+@@ -270,12 +271,12 @@
+ charIsRepresentable :: Char -> IO Bool
+ charIsRepresentable ch = return $ isLatin1 ch
+ 
+-withLCString = withCString
+-withLCStringLen = withCStringLen
+-newLCString = newCString
+-newLCStringLen = newCStringLen
+-peekLCString = peekCString
+-peekLCStringLen = peekCStringLen
++withLCString = FS.withCString
++withLCStringLen = FS.withCStringLen
++newLCString = FS.newCString
++newLCStringLen = FS.newCStringLen
++peekLCString = FS.peekCString
++peekLCStringLen = FS.peekCStringLen
+ 
+ #endif
+ 
diff -ruN ginsu.orig/pkg-message ginsu/pkg-message
--- ginsu.orig/pkg-message	Wed Dec 31 16:00:00 1969
+++ ginsu/pkg-message	Mon Mar 14 13:40:12 2005
@@ -0,0 +1,4 @@
+If you have never used gale before, you will not be able to chat with
+other users until you have generated a key for yourself.  go to
+http://repetae.net/john/computer/ginsu/ and follow the instructions
+there to create a new key in the yammer.net domain.
diff -ruN ginsu.orig/pkg-plist ginsu/pkg-plist
--- ginsu.orig/pkg-plist	Thu Mar  4 22:00:12 2004
+++ ginsu/pkg-plist	Wed Jul  6 02:52:31 2005
@@ -1 +1,2 @@
 bin/ginsu
+bin/ginsu-mdk
>Release-Note:
>Audit-Trail:
>Unformatted: