diff --git a/lib/CGI/Application.pm b/lib/CGI/Application.pm
index c64e1f1..a2cea9f 100644
--- a/lib/CGI/Application.pm
+++ b/lib/CGI/Application.pm
@@ -657,8 +657,8 @@ sub _send_headers {
 	my $type = $self->header_type;
 
     return
-        $type eq 'redirect' ? $q->redirect( $self->header_props )
-      : $type eq 'header'   ? $q->header  ( $self->header_props )
+        $type eq 'redirect' ? $q->redirect( $self->{__HEADER_PROPS} )
+      : $type eq 'header'   ? $q->header  ( $self->{__HEADER_PROPS} )
       : $type eq 'none'     ? ''
       : croak "Invalid header_type '$type'"
 }
@@ -670,8 +670,8 @@ sub _send_psgi_headers {
 	my $type = $self->header_type;
 
     return
-        $type eq 'redirect' ? $q->psgi_redirect( $self->header_props )
-      : $type eq 'header'   ? $q->psgi_header  ( $self->header_props )
+        $type eq 'redirect' ? $q->psgi_redirect( $self->{__HEADER_PROPS} )
+      : $type eq 'header'   ? $q->psgi_header  ( $self->{__HEADER_PROPS} )
       : $type eq 'none'     ? ''
       : croak "Invalid header_type '$type'"
 
diff --git a/t/header_props.t b/t/header_props.t
index 1561176..32940d4 100644
--- a/t/header_props.t
+++ b/t/header_props.t
@@ -1,6 +1,6 @@
 
 use strict;
-use Test::More tests => 9;
+use Test::More tests => 10;
 
 BEGIN{use_ok('CGI::Application');}
 
@@ -92,3 +92,14 @@ $ENV{CGI_APP_RETURN_ONLY} = 1;
 
 }
 
+{
+  my $app = CGI::Application->new;
+
+  $app->header_props( type => 'banana/ripe' );
+
+  like(
+    $app->run,
+    qr{Content-type: banana/ripe}i,
+    "an initial dash of prop. name can be omitted",
+  );
+}