Changeset 742 for trunk/EmbedBibPlugin/lib/TWiki/Plugins/EmbedBibPlugin.pm

Timestamp:

11/16/08 20:26:12 (4 years ago)

Author:

OlivierRaginel

Message:

Item38: Make use of sandbox

File:

• trunk/EmbedBibPlugin/lib/TWiki/Plugins/EmbedBibPlugin.pm (modified) (2 diffs)

trunk/EmbedBibPlugin/lib/TWiki/Plugins/EmbedBibPlugin.pm

@@ -172 +172 @@
     }
 
-
+    my $sandbox = $TWiki::sharedSandbox || $TWiki::sandbox;
     if ( $Style eq "bibtex" )
     {
-        return `$bibtoolcommand`;
+        return $sandbox->sysCommand( $bibtoolcommand );
     }
     elsif ( $Style eq "html" )
@@ -211 +211 @@
         # input from stdin
         open(TMPFILE, ">$tmpBibFile") or return "EMBEDBIB Error: fatal error";
-        my $tmpOut = `$bibtoolcommand`;
+        my $tmpOut = $sandbox->sysCommand( $bibtoolcommand );
         print TMPFILE $tmpOut;
         print TMPFILE $bibtex2htmlConf;
-
-        return `$bibtex2htmlPath $tmpBibFile $bibtex2htmlArgs `;
+        close TMPFILE;
+
+        $tmpOut = $sandbox->sysCommand( "$bibtex2htmlPath $tmpBibFile $bibtex2htmlArgs" );
+        unlink $tmpBibFile;
+        return $tmpOut;
     }
 }