Enable HTTP auth for WSDLRequest

lib/savon/request.rb

@@ -11,6 +11,7 @@ def initialize(globals, http_request = nil)
     def build
       configure_timeouts
       configure_ssl
+      configure_auth
 
       @http_request
     end
@@ -31,6 +32,11 @@ def configure_ssl
       @http_request.auth.ssl.ca_cert_file  = @globals[:ssl_ca_cert_file]  if @globals.include? :ssl_ca_cert_file
     end
 
+    def configure_auth
+      @http_request.auth.basic(*@globals[:basic_auth])   if @globals.include? :basic_auth
+      @http_request.auth.digest(*@globals[:digest_auth]) if @globals.include? :digest_auth
+    end
+
   end
 
   class SOAPRequest

spec/savon/request_spec.rb

@@ -116,6 +116,34 @@ def new_wsdl_request
         new_wsdl_request.build
       end
     end
+
+    describe "basic auth" do
+      it "is set when specified" do
+        globals.basic_auth("luke", "secret")
+        http_request.auth.expects(:basic).with("luke", "secret")
+
+        new_wsdl_request.build
+      end
+
+      it "is not set otherwise" do
+        http_request.auth.expects(:basic).never
+        new_wsdl_request.build
+      end
+    end
+
+    describe "digest auth" do
+      it "is set when specified" do
+        globals.digest_auth("lea", "top-secret")
+        http_request.auth.expects(:digest).with("lea", "top-secret")
+
+        new_wsdl_request.build
+      end
+
+      it "is not set otherwise" do
+        http_request.auth.expects(:digest).never
+        new_wsdl_request.build
+      end
+    end
   end
 
 end