New easter eggs

distributive · Mar 30, 2024 · f65a979 · f65a979
1 parent c3160e5
commit f65a979
Showing 1 changed file with 2 additions and 0 deletions.
diff --git a/src/Sahasrara/Plugins/Netrunner/Command/Find.hs b/src/Sahasrara/Plugins/Netrunner/Command/Find.hs
@@ -94,7 +94,9 @@ outputCard outf = \(query, set) m -> do
     case toLower query of
       "me" -> pure $ queryCard api $ messageAuthorName m
       ":|" -> liftIO $ chooseOne $ filter ((`elem` ["neutral_corp", "neutral_runner"]) . factionCode) $ cards api
+      "|:" -> liftIO $ chooseOne $ filter ((`elem` ["neutral_corp", "neutral_runner"]) . factionCode) $ cards api
       "qtm" -> liftIO $ chooseOne $ filter ((`elem` ["behold", "cerebral_overwriter", "dr_vientiane_keeling", "light_the_fire", "mindscaping", "ontological_dependence", "sds_drone_deployment"]) . code) $ cards api
+      "frog" -> liftIO $ chooseOne $ filter ((`elem` ["arissana_rocha_nahu_street_artist", "living_mural", "spree"]) . code) $ cards api
       _ -> pure $ queryCard api query
   let printings = reverse $ toPrintings api card
   case set of