diff options
Diffstat (limited to 'src/property/file.lisp')
-rw-r--r-- | src/property/file.lisp | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/src/property/file.lisp b/src/property/file.lisp index 26ce4a1..d9ca42a 100644 --- a/src/property/file.lisp +++ b/src/property/file.lisp @@ -430,8 +430,7 @@ commented out; the first commented or uncommented line for each key will be uncommented and used to set the value, if it exists." (:desc (format nil "~A has ~{~A=~S~^, ~}" file pairs)) (:apply (simple-conf-update file (loop for (k v) on pairs by #'cddr - collect k - collect (escape-sh-token v)) + collect k collect (sh-escape v)) ;; include quoting as part of the value so we ;; don't end up substituting double quotation ;; marks for single, or similar |