diff options
author | vanilla <vanilla@FreeBSD.org> | 2004-12-13 18:34:45 +0800 |
---|---|---|
committer | vanilla <vanilla@FreeBSD.org> | 2004-12-13 18:34:45 +0800 |
commit | 8d661c92753b4c122e78a0ee593903605168be30 (patch) | |
tree | bc05eef3cba31bfd31846745b7ea2e40f795f4dc | |
parent | a5f2410188f802392b210398f339630ebeb08b46 (diff) | |
download | freebsd-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/Makefile | 3 | ||||
-rw-r--r-- | devel/p5-PPerl/files/patch-main.c | 29 |
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; + } |