SF.net SVN: ledger-smb: [491] trunk/bin/arapprn.pl

[..hidden..]

Revision: 491
          http://svn.sourceforge.net/ledger-smb/?rev=491&view=rev
Author:   tetragon
Date:     2006-11-06 18:04:20 -0800 (Mon, 06 Nov 2006)

Log Message:
-----------
Fix screen display bug that causes internal server errors

Modified Paths:
--------------
    trunk/bin/arapprn.pl

Modified: trunk/bin/arapprn.pl
===================================================================
--- trunk/bin/arapprn.pl	2006-11-07 01:01:27 UTC (rev 490)
+++ trunk/bin/arapprn.pl	2006-11-07 02:04:20 UTC (rev 491)
@@ -115,7 +115,8 @@
   }
 
   $filename .= ($form->{format} eq 'postscript') ? '.ps' : '.pdf';
-  $form->{OUT} = ">${LedgerSMB::Sysconfig::spool}/$filename";
+  $form->{OUT} = ">${LedgerSMB::Sysconfig::spool}/$filename" if 
+  	$form->{media} ne 'screen';
 
   $form->{queued} .= " $form->{formname} $filename";
   $form->{queued} =~ s/^ //;


This was sent by the SourceForge.net collaborative development platform, the world's largest Open Source development site.