shithub: puzzles

Info  •  Files  •  Log  •  Branches

desktop.pl: cope with unfinished puzzles.

If I built with an unfinished puzzle enabled, then it will end up in
the 'unfinished' subdir of the main build directory, so desktop.pl
will need to write out a reference to it there.

--- a/desktop.pl

+++ b/desktop.pl

@@ -36,12 +36,16 @@

     open my $desktop, ">", "$outdir/$id.desktop"

         or die "$outdir/$id.desktop: open: $!\n";

+    my $path = "$bindir/$id";

+    my $upath = "$bindir/unfinished/$id";

+    $path = $upath if ! -f $path && -f $upath;

+

     print $desktop "[Desktop Entry]\n";

     print $desktop "Version=1.0\n";

     print $desktop "Type=Application\n";

     print $desktop "Name=$displayname\n";

     print $desktop "Comment=$description\n";

-    print $desktop "Exec=$bindir/$id\n";

+    print $desktop "Exec=$path\n";

     print $desktop "Icon=$icondir/$id-48d24.png\n";

     print $desktop "StartupNotify=false\n";

     print $desktop "Categories=Game;\n";