declare where dynamic application specific data is to be stored
This commit is contained in:
@@ -1,6 +1,11 @@
|
|||||||
#! /usr/bin/env /usr/local/bin/racket
|
#! /usr/bin/env /usr/local/bin/racket
|
||||||
#lang racket
|
#lang racket
|
||||||
|
|
||||||
|
;; default directory used for storing dynamic application data
|
||||||
|
(define data-dir
|
||||||
|
(build-path (find-system-path 'home-dir)
|
||||||
|
(build-path ".local" "share" "palps")))
|
||||||
|
|
||||||
(define (call-valid? call)
|
(define (call-valid? call)
|
||||||
(and
|
(and
|
||||||
(<= (string-length call) 9)
|
(<= (string-length call) 9)
|
||||||
|
|||||||
Reference in New Issue
Block a user