From 600f02668d3f53adc5105c9993887c5b343acb7a Mon Sep 17 00:00:00 2001
From: Zeno Rogue <zeno@attnam.com>
Date: Sun, 23 Feb 2025 22:58:23 +0100
Subject: [PATCH] added missing dual_of_current

---
 goldberg.cpp | 52 +++++++++++++++++++++++++++-------------------------
 1 file changed, 27 insertions(+), 25 deletions(-)

diff --git a/goldberg.cpp b/goldberg.cpp
index f5b3cef7..a7be0700 100644
--- a/goldberg.cpp
+++ b/goldberg.cpp
@@ -801,6 +801,32 @@ EX namespace gp {
       );
     }  
 
+  EX void dual_of_current() {
+    auto p = univ_param();
+    if(S3 == 3 && !UNTRUNCATED) {
+      println(hlog, "set param to ", p * loc(1,1));
+      if(!check_whirl_set(p * loc(1, 1))) return;
+      set_variation(eVariation::untruncated);
+      start_game();
+      config = human_representation(univ_param());
+      }
+    else if(S3 == 4 && !UNRECTIFIED) {
+      if(!check_whirl_set(p * loc(1, 1))) return;
+      set_variation(eVariation::unrectified);
+      start_game();
+      config = human_representation(univ_param());
+      }
+    else if(S3 == 3 && UNTRUNCATED) {
+      println(hlog, "whirl_set to ", (p * loc(1,1)) / 3);
+      if(!check_whirl_set((p * loc(1,1)) / 3)) return;
+      config = human_representation(univ_param());
+      }
+    else if(S3 == 4 && UNRECTIFIED) {
+      if(!check_whirl_set((p * loc(1,1)) / 2)) return;
+      config = human_representation(univ_param());
+      }
+    }
+
   void show() {
     cmode = sm::SIDE | sm::MAYDARK;
     gamescreen();
@@ -948,31 +974,7 @@ EX namespace gp {
     
     if(have_dual) {
       dialog::addItem(XLAT("dual of current"), 'D');
-      dialog::add_action([] { 
-        auto p = univ_param();
-        if(S3 == 3 && !UNTRUNCATED) {
-          println(hlog, "set param to ", p * loc(1,1));
-          if(!check_whirl_set(p * loc(1, 1))) return;
-          set_variation(eVariation::untruncated);
-          start_game();
-          config = human_representation(univ_param());
-          }
-        else if(S3 == 4 && !UNRECTIFIED) {
-          if(!check_whirl_set(p * loc(1, 1))) return;
-          set_variation(eVariation::unrectified);
-          start_game();
-          config = human_representation(univ_param());
-          }
-        else if(S3 == 3 && UNTRUNCATED) {
-          println(hlog, "whirl_set to ", (p * loc(1,1)) / 3);
-          if(!check_whirl_set((p * loc(1,1)) / 3)) return;
-          config = human_representation(univ_param());
-          }
-        else if(S3 == 4 && UNRECTIFIED) {
-          if(!check_whirl_set((p * loc(1,1)) / 2)) return;
-          config = human_representation(univ_param());
-          }
-        });
+      dialog::add_action(dual_of_current);
       }
     
     dialog::addBreak(100);