From d82d346afeeeacaaf9ed3ab6ba7873f4b77be9b5 Mon Sep 17 00:00:00 2001
From: Anurag Soni <anuragsoni.13@gmail.com>
Date: Wed, 11 Oct 2017 20:22:46 -0400
Subject: [PATCH] use isAlpha definition from the upcoming elm-lang core

---
 exercises/isogram/Isogram.example.elm | 8 ++++----
 1 file changed, 4 insertions(+), 4 deletions(-)

diff --git a/exercises/isogram/Isogram.example.elm b/exercises/isogram/Isogram.example.elm
index 7daa1bb..fd28cea 100644
--- a/exercises/isogram/Isogram.example.elm
+++ b/exercises/isogram/Isogram.example.elm
@@ -5,16 +5,16 @@ import List
 import Char
 
 
-isLetter : Char -> Bool
-isLetter c =
-    Char.isHexDigit c && (not <| Char.isDigit c)
+isAlpha : Char -> Bool
+isAlpha char =
+    Char.isUpper char || Char.isLower char
 
 
 isIsogram : String -> Bool
 isIsogram sentence =
     let
         sanitized =
-            String.filter isLetter sentence
+            String.filter isAlpha sentence
                 |> String.toLower
                 |> String.toList
                 |> List.sort