Changeset 37419 in project


Ignore:
Timestamp:
03/18/19 21:44:27 (21 months ago)
Author:
Kon Lovett
Message:

fix srfi 1 & 13 dep

Location:
release/5/locale/trunk
Files:
2 edited

Legend:

Unmodified
Added
Removed
  • release/5/locale/trunk/locale-current.scm

    r37385 r37419  
    6363;;; Parameters (Well, parameter-like)
    6464
    65 ;Delays initialization
    66 ;TLS (via current-locale-dictionary)
    67 
    6865;;
    6966
     
    121118
    122119(define (nonnull-getenv varnam)
    123   (let (
    124     (str (get-environment-variable varnam)) )
    125     (and
    126       (string? str) (not (string-null? str))
    127       str ) ) )
     120  (let ((str (get-environment-variable varnam)))
     121    (and (string? str) (not (string-null? str)) str) ) )
    128122
    129123(define (tm-dst? tm) (vector-ref tm 8))
     
    141135
    142136(define (synthetic-posix-timezone)
    143   (and-let* (
    144     (tz-str (nonnull-getenv "TZ")) )
     137  (and-let* ((tz-str (nonnull-getenv "TZ")))
    145138    (let (
    146139      (tz (synthetic-posix-timezone-components tz-str (list "POSIX" "TZ"))) )
     
    174167  ;
    175168  ;Chicken platform extensions
    176   (and-let* (
    177     (tz (locale-category-ref 'timezone)) )
     169  (and-let* ((tz (locale-category-ref 'timezone)))
    178170    (unless (locale-component-exists? tz 'dst?)
    179171      (set-timezone-component! tz 'dst? (current-dst?)) ) ) )
  • release/5/locale/trunk/locale.egg

    r37385 r37419  
    33
    44((synopsis "Provides locale operations")
    5  (version "0.8.0")
     5 (version "0.8.1")
    66 (category os)
    77 (author "[[kon lovett]]")
    88 (license "BSD")
    99 (dependencies
     10        (srfi-1 "0.5")
     11        (srfi-13 "0.2")
    1012        (regex "2.0")
    1113        (check-errors "3.1.0"))
Note: See TracChangeset for help on using the changeset viewer.