diff --git a/src/app-utils/options.scm b/src/app-utils/options.scm
index 3f39619906..b2487395ab 100644
--- a/src/app-utils/options.scm
+++ b/src/app-utils/options.scm
@@ -325,9 +325,7 @@
          (value (budget->guid default-value))
          (option-set #f)
          (value->string (lambda ()
-                          (string-append
-                           "'" (gnc:value->string (if option-set option #f)))))
-
+                          (string-append "'" (gnc:value->string value))))
          )
     (gnc:make-option
      section name sort-tag 'budget documentation-string