3

http-post-simple.el最新バージョンの Emacs トランクで使用するため のハンド デバッグを誰か教えてください: http://www.emacswiki.org/emacs/http-post-simple.el . Emacs を開くと、次のエラー メッセージが表示されます。

(lambda (field) ...) quoted with ' rather than with #'

エラーが発生している場所からの抜粋http-post-simple.elは次のとおりです。

(defun http-post-encode-fields (fields &optional charset)
  "Encode FIELDS using `http-post-encode-string', where
FIELDS is an alist of \(
    \(field-name-as-symbol . \"field value as string\"\) |
    \(field-name \"value1\" \"value2\" ...\)
    \)*

CHARSET defaults to 'utf-8"
  (let ((charset (or charset 'utf-8)))
    (mapconcat #'identity
           (mapcar '(lambda (field)
             (concat (symbol-name (car field))
              "="
              (http-post-encode-string (cdr field) charset)))
               (mapcan '(lambda (field)
                 (if (atom (cdr field)) (list field)
                     ;; unpack the list
                     (mapcar '(lambda (value)
                           `(,(car field) . ,value))
                         (cdr field))))
                   fields))
           "&")))


(defun http-post-encode-multipart-data (fields files charset)
  "Return FIELDS and FILES encoded for use as the data for a multipart HTTP POST request"
  (http-post-join-lines
   (mapcar '(lambda (field)
         (http-post-bound-field
          (format "Content-Disposition: form-data; name=%S" (symbol-name (car field)))
          ""
          (cdr field)))
       fields)
   (mapcan '(lambda (file)
         (destructuring-bind (fieldname filename mime-type data) file
           (http-post-bound-field
        (format "Content-Disposition: form-data; name=%S; filename=%S" fieldname filename)
        (format "Content-type: %s" (http-post-content-type mime-type charset))
        ""
        data)))
       files)
   (format "--%s--" (http-post-multipart-boundary))))
4

1 に答える 1

8

通常、ラムダ式を で引用したくありません'。

(lambda)は自己引用で と同等です#'(lambda)が'(lambda)、同じものではありません。

Emacs #'関数構文はいつ使用すべきか?を参照してください。

于 2013-06-24T23:32:49.600 に答える