Index: head/net/erlang_xmlrpc/Makefile
===================================================================
--- head/net/erlang_xmlrpc/Makefile	(revision 81881)
+++ head/net/erlang_xmlrpc/Makefile	(revision 81882)
@@ -1,50 +1,50 @@
 # New ports collection makefile for:	erlang_xmlrpc
 # Date Created:				5 March 2003
 # Whom:				 	olgeni@FreeBSD.org
 #
 # $FreeBSD$
 #
 
 PORTNAME=	erlang_xmlrpc
-PORTVERSION=	1.12
+PORTVERSION=	1.13
 CATEGORIES=	net
 MASTER_SITES=	http://www.gleipnir.com/xmlrpc/
 DISTNAME=	xmlrpc-${PORTVERSION}
 EXTRACT_SUFX=	.tgz
 DIST_SUBDIR=	erlang
 
 MAINTAINER=	olgeni@FreeBSD.org
 COMMENT=	A library for XMLRPC support in Erlang
 
 BUILD_DEPENDS=	erlc:${PORTSDIR}/lang/erlang \
 		${LOCALBASE}/lib/erlang/lib/xmerl/inc/xmerl.hrl:${PORTSDIR}/textproc/xmerl
 
 USE_GMAKE=	yes
 USE_REINPLACE=	yes
 WRKSRC=		${WRKDIR}/xmlrpc-${PORTVERSION}
 
 MAN3=		erlang_xmlrpc.3
 
 XMLRPC_DOCS=	xmlrpc.pdf xmlrpc.ps xmlrpc.txt
 
 post-patch:
 	@${REINPLACE_CMD} -e 's|XMERL_PATH=.*|XMERL_PATH=${LOCALBASE}/lib/erlang/lib/xmerl|g' ${WRKSRC}/src/Makefile
-	@${RM} ${WRKSRC}/src/Makefile.bak
+	@${RM} ${WRKSRC}/src/Makefile.bak ${WRKSRC}/src/*.orig
 
 do-build:
 	@cd ${WRKSRC}/src && ${GMAKE}
 
 do-install:
 	@${MKDIR} ${DOCSDIR}
 	@for FILE in ${XMLRPC_DOCS}; do \
 		${INSTALL_DATA} ${WRKSRC}/doc/$${FILE} ${DOCSDIR}; \
 	done
 	@${MKDIR} ${EXAMPLESDIR}
 	@${INSTALL_DATA} ${WRKSRC}/examples/* ${EXAMPLESDIR}
 	@${MKDIR} ${PREFIX}/lib/erlang/lib/xmlrpc
 	@${CP} -r ${WRKSRC}/ebin ${PREFIX}/lib/erlang/lib/xmlrpc
 	@${CP} -r ${WRKSRC}/src ${PREFIX}/lib/erlang/lib/xmlrpc
 	@${INSTALL_MAN} ${WRKSRC}/doc/xmlrpc.3 ${MANPREFIX}/man/man3/erlang_xmlrpc.3
 	@${CHOWN} -R ${SHAREOWN}:${SHAREGRP} ${PREFIX}/lib/erlang/lib/xmlrpc
 
 .include <bsd.port.mk>

Property changes on: head/net/erlang_xmlrpc/Makefile
___________________________________________________________________
Modified: cvs2svn:cvs-rev
## -1 +1 ##
-1.1
\ No newline at end of property
+1.2
\ No newline at end of property
Index: head/net/erlang_xmlrpc/distinfo
===================================================================
--- head/net/erlang_xmlrpc/distinfo	(revision 81881)
+++ head/net/erlang_xmlrpc/distinfo	(revision 81882)
@@ -1 +1 @@
-MD5 (erlang/xmlrpc-1.12.tgz) = 74d124f255a7ab10d559ed6d40761e25
+MD5 (erlang/xmlrpc-1.13.tgz) = f042297a05282bd21068043d6dc77305

Property changes on: head/net/erlang_xmlrpc/distinfo
___________________________________________________________________
Modified: cvs2svn:cvs-rev
## -1 +1 ##
-1.1
\ No newline at end of property
+1.2
\ No newline at end of property
Index: head/net/erlang_xmlrpc/files/patch-src_xmlrpc.erl
===================================================================
--- head/net/erlang_xmlrpc/files/patch-src_xmlrpc.erl	(nonexistent)
+++ head/net/erlang_xmlrpc/files/patch-src_xmlrpc.erl	(revision 81882)
@@ -0,0 +1,20 @@
+
+$FreeBSD$
+
+--- src/xmlrpc.erl.orig	Fri May 23 10:47:55 2003
++++ src/xmlrpc.erl	Fri May 23 10:47:57 2003
+@@ -164,7 +164,14 @@
+ 
+ get_payload(Socket, Timeout, ContentLength) ->
+     inet:setopts(Socket, [{packet, raw}]),
+-    gen_tcp:recv(Socket, ContentLength, Timeout).
++    get_payload(Socket, Timeout, ContentLength, []).
++
++get_payload(Socket, Timeout, 0, Payload) ->
++    {ok, lists:concat(lists:reverse(Payload))};
++
++get_payload(Socket, Timeout, ContentLength, Payload) ->
++    {ok, Bin} = gen_tcp:recv(Socket, 0, Timeout),
++    get_payload(Socket, Timeout, ContentLength - length(Bin), [Bin|Payload]).
+ 
+ %% Exported: start_link/{1,5,6}

Property changes on: head/net/erlang_xmlrpc/files/patch-src_xmlrpc.erl
___________________________________________________________________
Added: cvs2svn:cvs-rev
## -0,0 +1 ##
+1.1
\ No newline at end of property
Added: svn:keywords
## -0,0 +1 ##
+FreeBSD=%H
\ No newline at end of property
Index: head/net/erlang_xmlrpc/files/patch-src_xmlrpc__http.erl
===================================================================
--- head/net/erlang_xmlrpc/files/patch-src_xmlrpc__http.erl	(nonexistent)
+++ head/net/erlang_xmlrpc/files/patch-src_xmlrpc__http.erl	(revision 81882)
@@ -0,0 +1,29 @@
+
+$FreeBSD$
+
+--- src/xmlrpc_http.erl.orig	Wed Apr 23 21:06:45 2003
++++ src/xmlrpc_http.erl	Fri May 23 11:59:38 2003
+@@ -142,7 +142,14 @@
+ 
+ get_payload(Socket, Timeout, ContentLength) ->
+     inet:setopts(Socket, [{packet, raw}]),
+-    gen_tcp:recv(Socket, ContentLength, Timeout).
++    get_payload(Socket, Timeout, ContentLength, []).
++
++get_payload(Socket, Timeout, 0, Payload) ->
++    {ok, lists:concat(lists:reverse(Payload))};
++
++get_payload(Socket, Timeout, ContentLength, Payload) ->
++    {ok, Bin} = gen_tcp:recv(Socket, 0, Timeout),
++    get_payload(Socket, Timeout, ContentLength - length(Bin), [Bin|Payload]).
+ 
+ eval_payload(Socket, Timeout, {M, F} = Handler, State, Connection, Payload) ->
+     case catch M:F(State, Payload) of
+@@ -190,6 +197,7 @@
+     Response =
+ 	["HTTP/1.1 ", integer_to_list(StatusCode), " ",
+ 	 reason_phrase(StatusCode), "\r\n",
++	 "Content-Type: text/xml\r\n",
+ 	 "Content-Length: ", integer_to_list(lists:flatlength(Payload)),
+ 	 "\r\n",
+ 	 "Server: Erlang/1.13\r\n",

Property changes on: head/net/erlang_xmlrpc/files/patch-src_xmlrpc__http.erl
___________________________________________________________________
Added: cvs2svn:cvs-rev
## -0,0 +1 ##
+1.1
\ No newline at end of property
Added: svn:keywords
## -0,0 +1 ##
+FreeBSD=%H
\ No newline at end of property
Index: head/net/erlang_xmlrpc/pkg-plist
===================================================================
--- head/net/erlang_xmlrpc/pkg-plist	(revision 81881)
+++ head/net/erlang_xmlrpc/pkg-plist	(revision 81882)
@@ -1,36 +1,37 @@
 lib/erlang/lib/xmlrpc/ebin/tcp_serv.beam
 lib/erlang/lib/xmlrpc/ebin/xmlrpc.beam
 lib/erlang/lib/xmlrpc/ebin/xmlrpc_decode.beam
 lib/erlang/lib/xmlrpc/ebin/xmlrpc_encode.beam
 lib/erlang/lib/xmlrpc/ebin/xmlrpc_http.beam
 lib/erlang/lib/xmlrpc/ebin/xmlrpc_util.beam
 lib/erlang/lib/xmlrpc/src/Makefile
+lib/erlang/lib/xmlrpc/src/example_serv.erl
 lib/erlang/lib/xmlrpc/src/log.hrl
 lib/erlang/lib/xmlrpc/src/tcp_serv.erl
 lib/erlang/lib/xmlrpc/src/xmlrpc.erl
 lib/erlang/lib/xmlrpc/src/xmlrpc.hrl
 lib/erlang/lib/xmlrpc/src/xmlrpc_decode.erl
 lib/erlang/lib/xmlrpc/src/xmlrpc_encode.erl
 lib/erlang/lib/xmlrpc/src/xmlrpc_http.erl
 lib/erlang/lib/xmlrpc/src/xmlrpc_util.erl
 %%DOCSDIR%%/xmlrpc.pdf
 %%DOCSDIR%%/xmlrpc.ps
 %%DOCSDIR%%/xmlrpc.txt
 %%EXAMPLESDIR%%/BankClient.java
 %%EXAMPLESDIR%%/DateClient.java
 %%EXAMPLESDIR%%/EchoClient.java
 %%EXAMPLESDIR%%/FibClient.java
 %%EXAMPLESDIR%%/Makefile
 %%EXAMPLESDIR%%/README
 %%EXAMPLESDIR%%/date_server.erl
 %%EXAMPLESDIR%%/echo_server.erl
 %%EXAMPLESDIR%%/fib_server.erl
 %%EXAMPLESDIR%%/robust_bank_client.erl
 %%EXAMPLESDIR%%/robust_bank_server.erl
 %%EXAMPLESDIR%%/robust_banking.txt
 %%EXAMPLESDIR%%/validator.erl
 @dirrm lib/erlang/lib/xmlrpc/src
 @dirrm lib/erlang/lib/xmlrpc/ebin
 @dirrm lib/erlang/lib/xmlrpc/
 @dirrm %%EXAMPLESDIR%%
 @dirrm %%DOCSDIR%%

Property changes on: head/net/erlang_xmlrpc/pkg-plist
___________________________________________________________________
Modified: cvs2svn:cvs-rev
## -1 +1 ##
-1.1
\ No newline at end of property
+1.2
\ No newline at end of property