headers

diff --git a/lib/perl/NB/CGI.pm b/lib/perl/NB/CGI.pm
index 6547bc287bc5d09a7fed9c1de551243ca6aaf504..be9df9181c2020785f3296dc06129a254233bc3d 100644 (file)
--- a/lib/perl/NB/CGI.pm
+++ b/lib/perl/NB/CGI.pm
@@ -228,8 +228,9 @@ sub _tag_func {
 
 sub no_headers {
   my($self,@p) = &CGI::self_or_default(@_);
+  my $no_header_sav = $NO_HEADERS;
   $NO_HEADERS = $p[0] if @p;
-  return $NO_HEADERS;
+  return $no_header_sav;
 }
 
 sub tag {