Index: Makefile
===================================================================
RCS file: /cvs/ports/lang/lua/Makefile,v
retrieving revision 1.43
diff -u -r1.43 Makefile
--- Makefile	4 Dec 2011 21:12:19 -0000	1.43
+++ Makefile	6 Mar 2012 02:23:10 -0000
@@ -3,7 +3,7 @@
 COMMENT=	powerful, light-weight programming language
 
 DISTNAME=	lua-5.1.4
-REVISION=	3
+REVISION=	4
 CATEGORIES=	lang
 
 MASTER_SITES=	http://www.lua.org/ftp/ \
Index: patches/patch-src_lobject_c
===================================================================
RCS file: /cvs/ports/lang/lua/patches/patch-src_lobject_c,v
retrieving revision 1.3
diff -u -r1.3 patch-src_lobject_c
--- patches/patch-src_lobject_c	29 Oct 2007 20:30:32 -0000	1.3
+++ patches/patch-src_lobject_c	6 Mar 2012 02:23:10 -0000
@@ -45,14 +45,15 @@
 -      bufflen -= sizeof(" [string \"...\"] ");
 -      if (len > bufflen) len = bufflen;
 -      strcpy(out, "[string \"");
+-      if (source[len] != '\0') {  /* must truncate? */
+-        strncat(out, source, len);
+-        strcat(out, "...");
 +      size_t pos = strcspn(source, "\n\r");  /* stop at first newline */
 +      size_t len = bufflen - sizeof(" [string \"...\"] ");
 +      if (pos > len) pos = len;
 +      strlcpy(out, "[string \"", bufflen);
-       if (source[len] != '\0') {  /* must truncate? */
--        strncat(out, source, len);
--        strcat(out, "...");
-+        strlcat(out, source, len);
++      if (source[pos] != '\0') {  /* must truncate? */
++        strncat(out, source, pos);
 +        strlcat(out, "...", bufflen);
        }
        else