Allow the SOAP envelope header to be set as a String

lib/savon/soap/xml.rb

@@ -185,7 +185,14 @@ def complete_namespaces
 
       # Returns the SOAP header as an XML String.
       def header_for_xml
-        @header_for_xml ||= Gyoku.xml(header) + wsse_header
+        @header_for_xml ||=
+          begin
+            if Hash === header
+              Gyoku.xml(header)
+            else
+              header
+            end + wsse_header
+          end
       end
 
       # Returns the WSSE header or an empty String in case WSSE was not set.

spec/savon/soap/xml_spec.rb

@@ -208,13 +208,22 @@
     end
 
     context "with a SOAP header" do
-      it "should contain the given header" do
-        xml.header = {
-          :token => "secret",
-          :attributes! => { :token => { :xmlns => "http://example.com" } }
-        }
+      context "as a hash" do
+        it "should contain the given header" do
+          xml.header = {
+            :token => "secret",
+            :attributes! => { :token => { :xmlns => "http://example.com" } }
+          }
+
+          xml.to_xml.should include('<env:Header><token xmlns="http://example.com">secret</token></env:Header>')
+        end
+      end
+      context "as a string" do
+        it "should contain the given header" do
+          xml.header = %{<token xmlns="http://example.com">secret</token>}
 
-        xml.to_xml.should include('<env:Header><token xmlns="http://example.com">secret</token></env:Header>')
+          xml.to_xml.should include('<env:Header><token xmlns="http://example.com">secret</token></env:Header>')
+        end
       end
     end