diff --git a/changelog.txt b/changelog.txt
index e9a183309..e93bc153e 100644
--- a/changelog.txt
+++ b/changelog.txt
@@ -31,6 +31,7 @@ Template for new versions:
 ## New Features
 
 ## Fixes
+- `gui/quickfort`: only print a help blueprint's text once even if the repeat setting is enabled
 
 ## Misc Improvements
 - `control-panel`: Add realistic-melting tweak to control-panel registry
diff --git a/internal/quickfort/notes.lua b/internal/quickfort/notes.lua
index aa6416860..5667cfb93 100644
--- a/internal/quickfort/notes.lua
+++ b/internal/quickfort/notes.lua
@@ -31,7 +31,11 @@ function do_run(_, grid, ctx)
     if #line > 0 then
         table.insert(lines, table.concat(line, '    '))
     end
-    table.insert(ctx.messages, table.concat(lines, '\n'))
+    local message = table.concat(lines, '\n')
+    if not ctx.messages_set[message] then
+        table.insert(ctx.messages, message)
+        ctx.messages_set[message] = true
+    end
 end
 
 function do_orders()