From 652a2b361fe06328708c861bc54ebead1622e3a3 Mon Sep 17 00:00:00 2001
From: antonocube <antononcube@gmail.com>
Date: Wed, 11 Aug 2021 23:28:24 -0400
Subject: [PATCH] fix:Application of the shortcuts association for each
 function.

---
 Misc/ComputationalSpecCompletion.m | 14 ++++++++++----
 1 file changed, 10 insertions(+), 4 deletions(-)

diff --git a/Misc/ComputationalSpecCompletion.m b/Misc/ComputationalSpecCompletion.m
index b43126e2..b18cd94b 100644
--- a/Misc/ComputationalSpecCompletion.m
+++ b/Misc/ComputationalSpecCompletion.m
@@ -80,6 +80,8 @@ Mathematica is (C) Copyright 1988-2021 Wolfram Research, Inc.
 
   "RandomTabularDataset" -> "RandomTabularDataset",
   "RandomDataset" -> "RandomTabularDataset",
+  "RandomDataGeneration" -> "RandomTabularDataset",
+  "RandomDatasetGeneration" -> "RandomTabularDataset",
 
   "Recommendations" -> "Recommendations",
   "SMRMon" -> "Recommendations"
@@ -407,8 +409,10 @@ Mathematica is (C) Copyright 1988-2021 Wolfram Research, Inc.
 
 Clear[GetAnswers];
 Options[GetAnswers] = Join[ Options[GetRawAnswers], {"RemoveByThreshold" -> True}];
-GetAnswers[workflowType_String, command_String, nAnswers_Integer : 4, opts : OptionsPattern[]] :=
-    Block[{aRes, aParameterQuestions, parVal},
+GetAnswers[workflowTypeArg_String, command_String, nAnswers_Integer : 4, opts : OptionsPattern[]] :=
+    Block[{workflowType = workflowTypeArg, aRes, aParameterQuestions, parVal},
+
+      workflowType = workflowType /. aShortcuts;
 
       (*Get raw answers*)
       aRes = GetRawAnswers[workflowType, command, nAnswers, FilterRules[{opts}, Options[GetRawAnswers]]];
@@ -533,8 +537,10 @@ Mathematica is (C) Copyright 1988-2021 Wolfram Research, Inc.
 ComputationalSpecCompletion[cf_ClassifierFunction, command_String, opts : OptionsPattern[]] :=
     ComputationalSpecCompletion[ cf[command], command, opts];
 
-ComputationalSpecCompletion[workflowType_String, command_String, opts : OptionsPattern[]] :=
-    Block[{aRes},
+ComputationalSpecCompletion[workflowTypeArg_String, command_String, opts : OptionsPattern[]] :=
+    Block[{workflowType = workflowTypeArg, aRes},
+
+      workflowType = workflowType /. aShortcuts;
 
       aRes = GetAnswers[workflowType, command, FilterRules[{opts}, Options[GetAnswers]]];