Mercurial > pub > Impl

diff Lib/IMPL/Web/Application/Response.pm @ 207:f534a60d5b01

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
minor changes
author sergey
date Fri, 04 May 2012 02:09:13 +0400
parents 4d0e1962161c
children d6e2ea24af08
line wrap: on
line diff
--- a/Lib/IMPL/Web/Application/Response.pm	Thu May 03 16:48:39 2012 +0400
+++ b/Lib/IMPL/Web/Application/Response.pm	Fri May 04 02:09:13 2012 +0400
@@ -46,7 +46,7 @@
 sub CTOR {
     my ($this,%args) = @_;
     
-    if (lc $this->streamOut eq 'memory') {
+    if ($this->streamOut and lc $this->streamOut eq 'memory') {
         my $dummy = '';
         open my $hout, '>:encoding(utf8)', \$dummy or die new IMPL::Exception("Failed to create memory stream",$!);
         $this->streamOut($hout);