Special case for indentation of fat arrows in map literals. (#433)

* Special case for indentation of fat arrows in map literals.

* Mark the string key map test as not expecting to fail

* Add a failing test for a slightly more complicated case.

Author: NatTuck

elixir-smie.el

@@ -415,6 +415,8 @@
        (smie-rule-parent))
       ((smie-rule-parent-p ";")
        (smie-rule-parent))
+      ((smie-rule-parent-p "{")
+       (smie-rule-parent elixir-smie-indent-basic))
       (t (smie-rule-parent (- elixir-smie-indent-basic)))))
     (`(:before . "MATCH-STATEMENT-DELIMITER")
      (cond

test/elixir-mode-indentation-test.el

@@ -1510,7 +1510,7 @@ defmodule Foo do
 end")
 
 (elixir-def-indentation-test indent-maps-with-stings-as-keys
-                             (:expected-result :failed :tags '(indentation))
+                             (:tags '(indentation))
 "%{
 \"data\" => %{
 \"foo\" => %{
@@ -1526,6 +1526,23 @@ end")
   }
 }")
 
+(elixir-def-indentation-test indent-maps-with-multiple-string-keys
+                             (:expected-result :failed :tags '(indentation))
+"Enum.map [], fn x ->
+%{
+\"a\" => 5555,
+\"b\" => 5555,
+\"c\" => x,
+}
+end"
+"Enum.map [], fn x ->
+  %{
+    \"a\" => 5555,
+    \"b\" => 5555,
+    \"c\" => x,
+  }
+end")
+
 (elixir-def-indentation-test indent-maps-and-structs-elements
                              (:tags '(indentation))
 "