(type egg)
(signature "impromptu egg")
(timestamp 1612269487)
(sxml ((section 2 "Outdated egg!" (p "This is an egg for CHICKEN 4, the unsupported old release.  You're almost certainly looking for " (int-link "/eggref/5/impromptu" "the CHICKEN 5 version of this egg") ", if it exists.") (p "If it does not exist, there may be equivalent functionality provided by another egg; have a look at the " (link "https://wiki.call-cc.org/chicken-projects/egg-index-5.html" "egg index") ". Otherwise, please consider porting this egg to the current version of CHICKEN.") (tags "egg")) (section 2 "impromptu" (p "Spawn $EDITOR to update an association list for CLI scripts.") (toc)) (section 2 "Overview" (def (sig (procedure "(edit-properties alist)" (id edit-properties))) (p "Formats " (tt "alist") " to a temporary file and spawns the user's preferred editor on it. If the editor exits with a zero error level, the file is parsed back into a new association list having keywords for keys and returned.") (p "If the editor exits with a non-zero error, " (tt "edit-properties") " returns " (tt "#f") ".") (p "The editor is sought in the following order:") (ul (li (tt "$EDITOR") ", if set.") (li (tt "$VISUAL") ", if set.") (li "vi")))) (section 2 "Format" (highlight scheme "'((User: . \"joeblack\")\n  (Description: . \"Joe Black, an old friend of the family, is\\na short, stocky fellow with greased black hair.\"))") (p "Produces the following file:") (pre " :User: joeblack\n :Description:\n Joe Black, an old friend of the family, is\n a short, stocky fellow with greased black hair.")) (section 2 "Source" (p "The " (link "https://github.com/eraserhd/impromptu" "source is on github") ".")) (section 2 "Version History" (dl (dt "0.1.6") (dd "Resolve dependency issue (embedded-test vs. test)") (dt "0.1.5") (dd "Don't quote $EDITOR or $VISUAL (handles the 'subl -w' case)") (dt "0.1.4") (dd "Support $VISUAL") (dt "0.1.3") (dd "Fix handling of newlines")))))
