aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorvanilla <vanilla@FreeBSD.org>2004-12-13 18:34:45 +0800
committervanilla <vanilla@FreeBSD.org>2004-12-13 18:34:45 +0800
commit8d661c92753b4c122e78a0ee593903605168be30 (patch)
treebc05eef3cba31bfd31846745b7ea2e40f795f4dc
parenta5f2410188f802392b210398f339630ebeb08b46 (diff)
downloadfreebsd-ports-gnome-8d661c92753b4c122e78a0ee593903605168be30.tar.gz
freebsd-ports-gnome-8d661c92753b4c122e78a0ee593903605168be30.tar.zst
freebsd-ports-gnome-8d661c92753b4c122e78a0ee593903605168be30.zip
- Take maintainership
- add multiuser support from http://rt.cpan.org/NoAuth/Bug.html?id=5485 With this patch, we can allow multiuser run devel/svk on a shared box. PR: ports/71572 Submitted by: rafan at infor_dot_org_
-rw-r--r--devel/p5-PPerl/Makefile3
-rw-r--r--devel/p5-PPerl/files/patch-main.c29
2 files changed, 31 insertions, 1 deletions
diff --git a/devel/p5-PPerl/Makefile b/devel/p5-PPerl/Makefile
index 3bf30b217117..a99c7b02461d 100644
--- a/devel/p5-PPerl/Makefile
+++ b/devel/p5-PPerl/Makefile
@@ -8,12 +8,13 @@
PORTNAME= PPerl
PORTVERSION= 0.25
+PORTREVISION= 1
CATEGORIES= devel perl5
MASTER_SITES= ${MASTER_SITE_PERL_CPAN}
MASTER_SITE_SUBDIR= ../../authors/id/M/MS/MSERGEANT
PKGNAMEPREFIX= p5-
-MAINTAINER= ports@FreeBSD.org
+MAINTAINER= rafan@infor.org
COMMENT= Make perl scripts persistent in memory
USE_PERL5= yes
diff --git a/devel/p5-PPerl/files/patch-main.c b/devel/p5-PPerl/files/patch-main.c
new file mode 100644
index 000000000000..79795b564c62
--- /dev/null
+++ b/devel/p5-PPerl/files/patch-main.c
@@ -0,0 +1,29 @@
+--- main.c.orig Wed Mar 3 01:06:15 2004
++++ main.c Mon Dec 13 18:22:53 2004
+@@ -223,6 +223,8 @@
+ /* strict C compilers can't/won't do char foo[variant]; */
+ char *fullpath = my_malloc(path_max);
+ int i = 0;
++ char euid[sizeof(uid_t)+2];
++ sprintf(euid, "_%d", geteuid());
+
+ if (realpath(scriptname, fullpath) == NULL) {
+ perror("pperl: resolving full pathname to script failed");
+@@ -230,7 +232,7 @@
+ }
+ Dx(Debug("realpath returned: %s\n", fullpath));
+ /* Ugh. I am a terrible C programmer! */
+- sockname = my_malloc(strlen(P_tmpdir) + strlen(fullpath) + 3);
++ sockname = my_malloc(strlen(P_tmpdir) + strlen(fullpath) + 3 + strlen(euid));
+ save = sockname;
+ sprintf(sockname, "%s/", P_tmpdir);
+ sockname += strlen(P_tmpdir) + 1;
+@@ -246,7 +248,7 @@
+ }
+ sockname++; i++;
+ }
+- *sockname = '\0';
++ strcat(sockname, euid);
+ free(fullpath);
+ return save;
+ }