[digitalocean|compute] added some more request

- create_ssh_key
- list_ssh_keys

lib/fog/digitalocean/compute.rb

@@ -33,6 +33,8 @@ module Fog
       request      :power_off_server
       request      :power_on_server
       request      :shutdown_server
+      request      :list_ssh_keys
+      request      :create_ssh_key
 
       # request :digitalocean_resize      
 

lib/fog/digitalocean/requests/compute/create_ssh_key.rb

@@ -0,0 +1,26 @@
+module Fog
+  module Compute
+    class DigitalOcean
+      class Real
+
+        def create_ssh_key( name, pub_key )
+          request(
+            :expects  => [200],
+            :method   => 'GET',
+            :path     => 'droplets/new',
+            :query    => { 'name' => name, 'ssh_pub_key' => pub_key }
+          )
+        end
+
+      end
+
+      class Mock
+
+        def create_ssh_key( name, pub_key )
+          Fog::Mock.not_implemented
+        end
+
+      end
+    end
+  end
+end

lib/fog/digitalocean/requests/compute/list_ssh_keys.rb

@@ -0,0 +1,25 @@
+module Fog
+  module Compute
+    class DigitalOcean 
+      class Real
+
+        def list_ssh_keys(options = {})
+          request(
+            :expects  => [200],
+            :method   => 'GET',
+            :path     => 'ssh_keys'
+          )
+        end
+
+      end
+
+      class Mock
+
+        def list_ssh_keys
+          Fog::Mock.not_implemented
+        end
+
+      end
+    end
+  end
+end