diff options
author | Marc Espie <espie@cvs.openbsd.org> | 2007-04-30 09:37:37 +0000 |
---|---|---|
committer | Marc Espie <espie@cvs.openbsd.org> | 2007-04-30 09:37:37 +0000 |
commit | ffb2521541bd9537921e5fac34694b1d12c88898 (patch) | |
tree | 9cdb2cc9b7892d1c18d342266610af07c7860da9 /usr.sbin | |
parent | 725d45685b0e48b6fe1014282568e23f32d588f3 (diff) |
slight code reorg, no changes.
Diffstat (limited to 'usr.sbin')
-rw-r--r-- | usr.sbin/pkg_add/pkg_create | 59 |
1 files changed, 26 insertions, 33 deletions
diff --git a/usr.sbin/pkg_add/pkg_create b/usr.sbin/pkg_add/pkg_create index 3149885f168..b9815bad54a 100644 --- a/usr.sbin/pkg_add/pkg_create +++ b/usr.sbin/pkg_add/pkg_create @@ -1,6 +1,6 @@ #! /usr/bin/perl # ex:ts=8 sw=4: -# $OpenBSD: pkg_create,v 1.69 2007/04/30 09:34:06 espie Exp $ +# $OpenBSD: pkg_create,v 1.70 2007/04/30 09:37:36 espie Exp $ # # Copyright (c) 2003-2007 Marc Espie <espie@openbsd.org> # @@ -74,12 +74,6 @@ sub warn_once } } -sub makesum_plist -{ - my ($self, $plist, $base, $stash, $infodir) = @_; - $self->add_object($plist); -} - use OpenBSD::md5; sub compute_checksum @@ -104,6 +98,16 @@ sub compute_checksum } } +sub makesum_plist +{ + my ($self, $plist, $base, $stash, $infodir) = @_; + $self->add_object($plist); +} + +sub verify_checksum +{ +} + package OpenBSD::PackingElement::PkgConflict; sub avert_duplicates_and_other_checks { @@ -136,6 +140,21 @@ sub comment_create_package print "Adding ", $self->{name}, "\n"; } +package OpenBSD::PackingElement::Cwd; +use OpenBSD::Temp; + +sub archive +{ + my ($self, $arc, $base) = @_; + $arc->destdir($base."/".$self->{name}); +} + +sub comment_create_package +{ + my ($self) = @_; + print "Cwd: ", $self->{name}, "\n"; +} + package OpenBSD::PackingElement::FileBase; use POSIX; @@ -181,32 +200,6 @@ sub print_file print '@', $item->keyword(), " ", $item->fullname(), "\n"; } -package OpenBSD::PackingElement::Cwd; -use OpenBSD::Temp; - -sub archive -{ - my ($self, $arc, $base) = @_; - $arc->destdir($base."/".$self->{name}); -} - -sub comment_create_package -{ - my ($self) = @_; - print "Cwd: ", $self->{name}, "\n"; -} - -package OpenBSD::PackingElement; - -sub create_checksum -{ -} - -sub verify_checksum -{ -} - -package OpenBSD::PackingElement::FileBase; sub makesum_plist { my ($self, $plist, $base, $stash, $infodir) = @_; |