Changeset 29598 for main/trunk/package-kits/linux/perllib/Greenstone/Package/_pacman.pm

Timestamp:

2014-12-11T18:58:24+13:00 (9 years ago)

Author:

Jeremy Symon

Message:

Changed package generators to not use the tmp directory needlessly, and fixed some problems with the debian generator. Still need to test on systems with rpm/apt and fix all the problems.

File:

• main/trunk/package-kits/linux/perllib/Greenstone/Package/_pacman.pm (modified) (4 diffs)

main/trunk/package-kits/linux/perllib/Greenstone/Package/_pacman.pm

@@ -54 +54 @@
         exists $self->{config}->{PRE_REMOVE} or
         exists $self->{config}->{POST_REMOVE}) {
-        my $name = "$self->{config}->{NAME}.install";
-        open my $INSTALL, '>', "/tmp/gspkg.$name";
+        my $file = "$self->{output}/$self->{config}->{NAME}.install";
+        print "    - $file\n";
+        open my $INSTALL, '>', $file;
         exists $self->{config}->{PRE_INSTALL} and do {
             $self->write_function ("pre_install", $INSTALL, @{$self->{config}->{PRE_INSTALL}});
@@ -69 +70 @@
             $self->write_function ("post_remove", $INSTALL, @{$self->{config}->{POST_REMOVE}});
         close $INSTALL;
-        $self->add ("/tmp/gspkg.$name", "$self->{output}/$name");
-        return "install=$name";
+        return "install=$file";
     } else {
         return "";
@@ -84 +84 @@
         }
     }
-    open my $PKGBUILD, '>', "/tmp/gspkg.PKGBUILD";
+    my $file = "$self->{output}/PKGBUILD";
+    print "    - $file\n";
+    open my $PKGBUILD, '>', $file;
     for my $line (
         '# Maintainer: %MAINTAINER_NAME% <%MAINTAINER_EMAIL%>',
@@ -137 +139 @@
     }
     close $PKGBUILD;
-    $self->add ("/tmp/gspkg.PKGBUILD", "$self->{output}/PKGBUILD");
 }