FUEL: remove fuel-scaffold-developer-name

It seem unlikely that someone would need this variable when you can
instead use user-full-name or set developer-name in Factor.

diff --git a/misc/fuel/fuel-scaffold.el b/misc/fuel/fuel-scaffold.el
index cd92070dda11beb1686f4e3c3b2e4ccce4d43741..96678da97d2e7606edbc42bce1d1154407f82e50 100644 (file)
--- a/misc/fuel/fuel-scaffold.el
+++ b/misc/fuel/fuel-scaffold.el
@@ -27,13 +27,6 @@
   "Options for FUEL's scaffolding."
   :group 'fuel)
 
   "Options for FUEL's scaffolding."
   :group 'fuel)
 

-(defcustom fuel-scaffold-developer-name nil
-  "The name to be inserted as yours in scaffold templates."
-  :type '(choice string
-                 (const :tag "Factor's value for developer-name" nil))
-  :group 'fuel-scaffold)
-
-\f

 ;;; Auxiliary functions:
 
 (defun fuel-mode--code-file (kind &optional file)
 ;;; Auxiliary functions:
 
 (defun fuel-mode--code-file (kind &optional file)


@@ -59,7 +52,6 @@
                           "fuel"
                           ("namespaces" "tools.scaffold"))))
         (fuel-eval--retort-result (fuel-eval--send/wait cmd)))
                           "fuel"
                           ("namespaces" "tools.scaffold"))))
         (fuel-eval--retort-result (fuel-eval--send/wait cmd)))

-      fuel-scaffold-developer-name

       user-full-name
       "Your name"))
 
       user-full-name
       "Your name"))
 


@@ -149,8 +141,8 @@ IN: %s
 adds source and authors.txt files. Prompts the user for optional summary,
 tags, help, and test file creation.
 
 adds source and authors.txt files. Prompts the user for optional summary,
 tags, help, and test file creation.
 

-You can configure `fuel-scaffold-developer-name' for the name to
-be inserted in the generated files."
+You can configure `user-full-name' for the name to be inserted in
+the generated files."

   (interactive)
   (let* ((name (read-string "Vocab name: " name-hint))
          (root (completing-read "Vocab root: "
   (interactive)
   (let* ((name (read-string "Vocab name: " name-hint))
          (root (completing-read "Vocab root: "


@@ -187,7 +179,7 @@ be inserted in the generated files."
 scaffolded help for each word in the current vocabulary.
 
 With prefix argument, ask for the vocabulary name. You can
 scaffolded help for each word in the current vocabulary.
 
 With prefix argument, ask for the vocabulary name. You can

-configure `fuel-scaffold-developer-name' for the name to be
+configure `user-full-name' for the name to be

 inserted in the generated file."
   (interactive "P")
   (let* ((vocab (or (and (not arg) (factor-current-vocab))
 inserted in the generated file."
   (interactive "P")
   (let* ((vocab (or (and (not arg) (factor-current-vocab))


@@ -205,8 +197,8 @@ inserted in the generated file."
 vocabulary.
 
 With prefix argument, ask for the vocabulary name. You can
 vocabulary.
 
 With prefix argument, ask for the vocabulary name. You can

-configure `fuel-scaffold-developer-name' for the name to be
-inserted in the generated file."
+configure `user-full-name' for the name to be inserted in the
+generated file."

   (interactive "P")
   (let* ((vocab (or (and (not arg) (factor-current-vocab))
                     (fuel-completion--read-vocab nil)))
   (interactive "P")
   (let* ((vocab (or (and (not arg) (factor-current-vocab))
                     (fuel-completion--read-vocab nil)))


@@ -222,7 +214,7 @@ inserted in the generated file."
 vocabulary.
 
 With prefix argument, ask for the vocabulary name. You can
 vocabulary.
 
 With prefix argument, ask for the vocabulary name. You can

-configure `fuel-scaffold-developer-name' for the name to be
+configure `user-full-name' for the name to be

 inserted in the generated file."
   (interactive "P")
   (let* ((vocab (or (and (not arg) (factor-current-vocab))
 inserted in the generated file."
   (interactive "P")
   (let* ((vocab (or (and (not arg) (factor-current-vocab))