Changeset 18258 in project


Ignore:
Timestamp:
05/30/10 17:50:50 (11 years ago)
Author:
Mario Domenech Goulart
Message:

awful (trunk): replaced function' keyword parameter by prelude'.

File:
1 edited

Legend:

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

    r18235 r18258  
    378378;;; Ajax
    379379(define (ajax path id event proc #!key target (action 'html) (method 'POST) (arguments '())
    380               js no-session no-db no-page-javascript vhost-root-path live content-type function)
     380              js no-session no-db no-page-javascript vhost-root-path live content-type prelude)
    381381  (if (enable-ajax)
    382382      (let ((path (if (regexp? path)
     
    417417                              "')." binder "('" events "',"))
    418418                        "")
    419                     (or function
    420                         (++ "function(){$.ajax({type:'" (->string method) "',"
    421                             "url:'" path "',"
    422                             (if content-type
    423                                 (conc "contentType: '" content-type "',")
    424                                 "")
    425                             "success:function(h){"
    426                             (or js
    427                                 (if target
    428                                     (++ "$('#" target "')." (->string action) "(h);")
    429                                     "return;"))
    430                             "},"
    431                             (++ "data:{"
    432                                 (string-intersperse
    433                                  (map (lambda (var/val)
    434                                         (conc  "'" (car var/val) "':" (cdr var/val)))
    435                                       arguments)
    436                                  ",") "}")
    437                             "})}"))
     419                    (++ "function(){"
     420                        (or prelude "")
     421                        "$.ajax({type:'" (->string method) "',"
     422                        "url:'" path "',"
     423                        (if content-type
     424                            (conc "contentType: '" content-type "',")
     425                            "")
     426                        "success:function(h){"
     427                        (or js
     428                            (if target
     429                                (++ "$('#" target "')." (->string action) "(h);")
     430                                "return;"))
     431                        "},"
     432                        (++ "data:{"
     433                            (string-intersperse
     434                             (map (lambda (var/val)
     435                                    (conc  "'" (car var/val) "':" (cdr var/val)))
     436                                  arguments)
     437                             ",") "}")
     438                        "})}")
    438439                    (if (and id event)
    439440                        ");\n"
Note: See TracChangeset for help on using the changeset viewer.