Changeset 27273 in project for release/4/qwiki/trunk/qwiki.scm


Ignore:
Timestamp:
08/20/12 22:28:11 (9 years ago)
Author:
sjamaan
Message:

Qwiki: fix bug in call to read-urlencoded-request-data

File:
1 edited

Legend:

Unmodified
Added
Removed
  • release/4/qwiki/trunk/qwiki.scm

    r27237 r27273  
    295295         (auth-required (requires-authentication? source-file))
    296296         (postdata (if (eq? 'POST (request-method req))
    297                        (read-urlencoded-request-data)
     297                       (read-urlencoded-request-data req)
    298298                       '()))
    299299         (new-file (not (file-exists? source-file)))
     
    654654               ((cdr handler) (current-request))))
    655655         ((any impossible-filename? (cdr (uri-path uri))) ; should be absolute
    656           (read-urlencoded-request-data) ; Discard possible sent data
     656          (read-urlencoded-request-data req) ; Discard possible sent data
    657657          (send-status 404 "Not found"))
    658658         (else (let* ((action (->symbol (alist-ref
Note: See TracChangeset for help on using the changeset viewer.