#! /usr/bin/perl # # This code mostly stolen from easy-import written by J^vrg Wunsch # # $Id: modulesupdate,v 1.8 2000/04/02 05:42:12 mharo Exp $ # $FreeBSD$ use strict; my $tmpdir; if ($ENV{CVSROOT} eq "") { $ENV{CVSROOT}="pcvs.freebsd.org:/home/pcvs"; } sub goodbye { my ($exitstatus)=@_; chdir "/tmp"; print `rm -rf $tmpdir`; exit $exitstatus; } sub contains { # look if the first parameter is contained in the list following it my($item, @list) = @_; foreach my $i (@list) { return 1 if $i eq $item; } return 0; } sub lsmodules { # list all known CVS modules my(%rv, $mname, $mpath); %rv = (); open(CVS, "cvs -R co -c|") || die "cvs: $!"; while() { chomp; chomp; ($mname,$mpath) = split; next if $mname eq ""; $rv{$mname} = $mpath; } close(CVS); return %rv; } my %cvsmods = &lsmodules; my $modulename = shift; my $modulepath = shift; my $dont_do_it = ""; $tmpdir=`mktemp -d -t mu`; chomp $tmpdir; chdir $tmpdir or die "$tmpdir: $!"; if ($modulepath eq "") { print "Error: Must specify both modulename and modulepath\n"; &goodbye(1); } if (&contains($modulename, keys(%cvsmods))) { print "Error: $modulename already exists in modules\n"; &goodbye(1); } my $mod = ""; foreach my $tmp (sort(keys(%cvsmods))) { if ($tmp gt $modulename) { $mod = $tmp; last; } } my $cmd; if ($mod eq "") { # we are going to append our module $cmd = "\$\na\n"; } else { # we can insert it $cmd = "/^" . $mod . "[ \t]/\ni\n"; } print "Checking out the modules database...\n"; system("cvs -R co modules") && die "failed.\n"; my $len = length($modulename); print "Inserting new module...\n"; open(ED, "|ed modules/modules") || die "Cannot start ed\n"; print ED "$cmd$modulename" . "\t" x ($len < 8 ? 2 : 1) . "$modulepath\n.\nw\nq\n"; close(ED); print "Commiting new modules database...\n"; system("cvs -R $dont_do_it commit -m \" " . "$modulename --> $modulepath\" modules") && die "Commit failed\n"; # cleanup &goodbye; ndabot/npm_and_yarn/devel/electron4/files/lodash-4.17.19'>dependabot/npm_and_yarn/devel/electron4/files/lodash-4.17.19 FreeBSD GNOME current development ports (https://github.com/freebsd/freebsd-ports-gnome)
aboutsummaryrefslogtreecommitdiffstats
path: root/net/wmlj
Commit message (Expand)AuthorAgeFilesLines
* Bump PORTREVISION on glib12/gtk12 consumer ports to ease the upgrade path.ade2006-03-071-0/+1
* - Update to 0.4.0erwin2005-12-222-6/+5
* - Add SHA256pav2005-11-261-0/+1
* Reset bouncing maintainer addresses.linimon2005-10-101-1/+1
* Update ftp/curl to 7.12.0 and bump the shared library version in allroam2004-06-041-2/+2
* SIZEify (maintainer timeout)trevor2004-03-311-0/+1
* Use PLIST_FILES (bento-tested, marcus-reviewed).trevor2004-02-062-1/+1
* Bump PORTREVISION on all ports that depend on gettext to aid with upgrading.marcus2004-02-041-0/+1
* Remove USE_GNOMENG.marcus2003-04-211-1/+0
* De-pkg-comment.knu2003-02-212-1/+1
* Deploy USE_GNOMENG infrastructurelioux2002-09-031-1/+2
* Update to version 0.3.2kevlo2002-02-082-2/+2
* Update to 0.3pat2002-02-072-4/+3
* Update to 0.2pat2002-01-072-2/+2