Changeset 12533 in project for release/3/svnwiki-rating


Ignore:
Timestamp:
11/16/08 19:13:36 (12 years ago)
Author:
azul
Message:

Importing svnwiki extensions.

Location:
release/3/svnwiki-rating
Files:
4 added
1 copied

Legend:

Unmodified
Added
Removed
  • release/3/svnwiki-rating/trunk/svnwiki-rating.scm

    • Property svn:keywords set to id
    r12412 r12533  
    1 (use html-stream stream-ext srfi-40 format-modular)
     1; $id$
     2;
     3; License: GPL-3
     4
     5(declare (export))
     6(use svnwiki-extensions-support srfi-40 html-stream stream-ext format-modular orders srfi-1 svn-client svn-post-commit-hooks)
    27
    38(define (create-rating-helper env)
     
    214219
    215220(define (rating-update env)
    216   (create-rating-helper env)
    217221  (let-from-environment env (path-out path-in base path user password old-rev)
    218222    (let* ((entry (post-commit-changed-files
     
    378382        (rating-produce-xml env)))))
    379383
    380 (set! *extensions*
    381   `((rating
    382       (render-bottom-span ,rating-render-bottom-span)
    383       (dynamic ,rating-dynamic)
    384       (update ,rating-update))))
     384(svnwiki-extension-define 'render-bottom-span 'rating rating-render-bottom-span)
     385(svnwiki-extension-define 'dynamic 'rating rating-dynamic)
     386(svnwiki-extension-define 'update-notify 'rating rating-update)
     387(svnwiki-extension-define 'start-update-notify 'rating create-rating-helper)
Note: See TracChangeset for help on using the changeset viewer.