Enumerations should .gist to just the key, not including the full pac…

…kage name.
sorear · Jan 30, 2012 · fb2bb1e · fb2bb1e
1 parent ff52ee4
commit fb2bb1e
Showing 1 changed file with 1 addition and 4 deletions.
diff --git a/lib/CORE.setting b/lib/CORE.setting
@@ -1129,10 +1129,7 @@ my role CommonEnum {
     method perl()  {
         defined(self) ?? (self.typename ~ "::" ~ self.key) !! self.typename
     }
-    method gist()   {
-        defined(self) ?? (self.typename ~ "::" ~ self.key) !!
-            (self.typename ~ "()")
-    }
+    method gist()  { defined(self) ?? self.key !! (self.typename ~ "()") }
     method key()   { self.enums._index_to_key($!index) }
     method value() { self.enums._index_to_value($!index) }
     method kv()    { self.key, self.value }