Changeset 20272 in project


Ignore:
Timestamp:
09/13/10 00:11:08 (9 years ago)
Author:
Mario Domenech Goulart
Message:

autoform-postgresql: fix for the is_nullable' -> mandatory?' mapping (should be a boolean for autoform). Version bumped to 0.2.

Location:
release/4/autoform-postgresql/trunk
Files:
2 edited

Legend:

Unmodified
Added
Removed
  • release/4/autoform-postgresql/trunk/autoform-postgresql.scm

    r19918 r20272  
    1212(get-database-structure
    1313 (lambda (conn db-table)
    14    ($db conn "select column_name, data_type, character_maximum_length, is_nullable "
    15         "from information_schema.columns where table_name = '" db-table "'")))
     14   (let ((results
     15          ($db conn "select column_name, data_type, character_maximum_length, is_nullable "
     16               "from information_schema.columns where table_name = '" db-table "'")))
     17     (map (lambda (item)
     18            ;; set the `mandatory?' field according to `is_nullable'
     19            (if (equal? (list-ref item 3) "NO")
     20                (set-car! (cdddr item) #t)
     21                (set-car! (cdddr item) #f))
     22            item)
     23          results))))
    1624
    1725(autoform-db-connection? connection?)
  • release/4/autoform-postgresql/trunk/autoform-postgresql.setup

    r19918 r20272  
    66(install-extension 'autoform-postgresql
    77                   '("autoform-postgresql.so" "autoform-postgresql.import.so")
    8                    '((version 0.1)))
     8                   '((version 0.2)))
Note: See TracChangeset for help on using the changeset viewer.