From 034338467715cfa6ab2aaf7d53c711c062e98be9 Mon Sep 17 00:00:00 2001
From: Bruce Conrad <bruce_conrad@byu.edu>
Date: Sat, 9 Sep 2023 07:44:19 -0600
Subject: [PATCH] use profile name

---
 krl/io.picolabs.plan.connect.krl | 2 +-
 krl/io.picolabs.plan.profile.krl | 5 ++++-
 2 files changed, 5 insertions(+), 2 deletions(-)

diff --git a/krl/io.picolabs.plan.connect.krl b/krl/io.picolabs.plan.connect.krl
index 340b525..445884d 100644
--- a/krl/io.picolabs.plan.connect.krl
+++ b/krl/io.picolabs.plan.connect.krl
@@ -33,7 +33,7 @@ ruleset io.picolabs.plan.connect {
 </form>
 <ul>
 #{did_map.keys().map(function(k){
-  name = wrangler:picoQuery(k,"io.picolabs.wrangler","name",{})
+  name = wrangler:picoQuery(k,"io.picolabs.plan.profile","name",{})
   title = name => << title="#{name}">> | ""
 <<<li#{title}>#{k.elide()} : #{did_map.get(k).elide()}</li>
 >>}).join("")}</ul>
diff --git a/krl/io.picolabs.plan.profile.krl b/krl/io.picolabs.plan.profile.krl
index 0f5f639..095e6f8 100644
--- a/krl/io.picolabs.plan.profile.krl
+++ b/krl/io.picolabs.plan.profile.krl
@@ -4,7 +4,7 @@ ruleset io.picolabs.plan.profile {
     use module io.picolabs.plan.apps alias app
     use module io.picolabs.pds alias pds
     use module io.picolabs.wrangler alias wrangler
-    shares profile
+    shares profile, name
     provides data
   }
   global {
@@ -100,6 +100,9 @@ You may edit your information: click, change, and press Enter key (or Esc to und
           a.put(k,pds:getData("profile",n))
         },{})
     }
+    name = function(){
+      pds:getData("profile",element_names[1])
+    }
   }
   rule initializeProfile {
     select when io_picolabs_plan_profile factory_reset