From 2ce39dfbcc58a56c68ad67d8f3224b94f4b6c4ab Mon Sep 17 00:00:00 2001
From: Martin Gausby <martin@gausby.dk>
Date: Tue, 12 Apr 2016 18:39:37 +0200
Subject: [PATCH] added failing tests for named functions in if and case

---
 test/elixir-mode-indentation-test.el | 44 ++++++++++++++++++++++++++++
 1 file changed, 44 insertions(+)

diff --git a/test/elixir-mode-indentation-test.el b/test/elixir-mode-indentation-test.el
index c352aa0d..313234fb 100644
--- a/test/elixir-mode-indentation-test.el
+++ b/test/elixir-mode-indentation-test.el
@@ -376,6 +376,29 @@ else: :bar"
   else: :bar"
 )
 
+(elixir-def-indentation-test indent-if-when-condition-is-a-named-function-on-a-module
+                             (:expected-result :failed :tags '(indentation))
+                             ;; https://github.com/elixir-lang/emacs-elixir/issues/323
+"defmodule Whois do
+  def lookup2(domain) do
+    if Server.for(domain) do
+          :ok
+        else
+          :error
+        end
+  end
+end"
+"defmodule Whois do
+  def lookup2(domain) do
+    if Server.for(domain) do
+      :ok
+    else
+      :error
+    end
+  end
+end"
+)
+
 (elixir-def-indentation-test indent-try
                              (:tags '(indentation))
   "
@@ -1525,6 +1548,27 @@ end"
     end
 end")
 
+(elixir-def-indentation-test indent-case-when-condition-is-a-named-function-on-a-module
+                             (:expected-result :failed :tags '(indentation))
+                             ;; https://github.com/elixir-lang/emacs-elixir/issues/323
+"defmodule Whois do
+  def lookup1(domain) do
+    case Server.for(domain) do
+          {:ok, server} -> server
+          :error -> {:error, :unsupported}
+        end
+  end
+end"
+"defmodule Whois do
+  def lookup1(domain) do
+    case Server.for(domain) do
+      {:ok, server} -> server
+      :error -> {:error, :unsupported}
+    end
+  end
+end"
+)
+
 (elixir-def-indentation-test close-map-curly-brackt
                              (:tags '(indentation))
 "