Changeset 15217 in project


Ignore:
Timestamp:
07/15/09 20:06:23 (10 years ago)
Author:
certainty
Message:

simplified expression

File:
1 edited

Legend:

Unmodified
Added
Removed
  • release/4/uri-dispatch/trunk/uri-dispatch.scm

    r15216 r15217  
    88;; Version: $Id$
    99;; Version:
    10 ;; Last-Updated: Mi Jul 15 20:12:32 2009 (CEST)
     10;; Last-Updated: Mi Jul 15 20:21:49 2009 (CEST)
    1111;;           By: David Krentzlin <david@lisp-unleashed.de>
    12 ;;     Update #: 84
     12;;     Update #: 85
    1313;; URL:
    1414;; Keywords:
     
    104104 
    105105  (define (whitelisted? symbol mod)   
    106     (or (and (not (enable-checks)) #t)
     106    (or (not (enable-checks))
    107107        (and (not mod) (member symbol procedure-whitelist))
    108108        (and mod (member mod module-whitelist))))
Note: See TracChangeset for help on using the changeset viewer.