From 6efbce9f8fc3e4934b6410b9b33c8ee151833d17 Mon Sep 17 00:00:00 2001
From: Gregor Kleen <gkleen@yggdrasil.li>
Date: Wed, 24 Feb 2016 00:39:10 +0000
Subject: pm should be +-

---
 rpn.hs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/rpn.hs b/rpn.hs
index ff7dd6c..64fdb89 100755
--- a/rpn.hs
+++ b/rpn.hs
@@ -69,7 +69,7 @@ clarifySymbol s = do
 
 isKnownSymbol :: String -> Bool
 isKnownSymbol s = or [
-  s `elem` ["+", "-", "*", "/", "±", "pm", "e"],
+  s `elem` ["+", "-", "*", "/", "±", "+-", "e"],
   isJust $ (maybeRead s :: Maybe Double)
                      ]
 
-- 
cgit v1.2.3