SF.net SVN: ledger-smb:[3624] trunk/scripts/file.pl

[..hidden..]

Revision: 3624
          http://ledger-smb.svn.sourceforge.net/ledger-smb/?rev=3624&view=rev
Author:   einhverfr
Date:     2011-08-04 01:54:23 +0000 (Thu, 04 Aug 2011)

Log Message:
-----------
Binary storage problem solved

Modified Paths:
--------------
    trunk/scripts/file.pl

Modified: trunk/scripts/file.pl
===================================================================
--- trunk/scripts/file.pl	2011-08-04 00:09:35 UTC (rev 3623)
+++ trunk/scripts/file.pl	2011-08-04 01:54:23 UTC (rev 3624)
@@ -90,7 +90,7 @@
         $file->file_name($fnames[0]);
         $file->get_mime_type;
         my $fh = $request->{_request}->upload('upload_data');
-        my $fdata = join ("\n", <$fh>);
+        my $fdata = join ("", <$fh>);
         $file->content($fdata);
     }
     $request->{content} = $file->content;


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