brmlab/hackerbase
4
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity

HOME expansion

Browse source
This commit is contained in:
Dominik Pantůček 2023-07-29 17:14:48 +02:00
parent 35f53f196e
commit fc80430217
3 changed files with 7 additions and 6 deletions
Download patch file Download diff file Expand all files Collapse all files

3
fetch_fio.sh
View file

@ -32,8 +32,7 @@ exit 0
APIURI=https://www.fio.cz/ib_api/rest APIURI=https://www.fio.cz/ib_api/rest
# Configuration defaults - none # Configuration defaults - none
# TODO: quick fix CONFIG_FILE="$HOME/.hackerbaserc"
CONFIG_FILE=/home/hackerbase/.hackerbaserc
CFG_BANK_DIR= CFG_BANK_DIR=
CFG_APIKEYS_FILE= CFG_APIKEYS_FILE=
ARG_BANK_DIR= ARG_BANK_DIR=

3
fetch_fio_fine.sh
View file

@ -29,8 +29,7 @@
APIURI=https://www.fio.cz/ib_api/rest APIURI=https://www.fio.cz/ib_api/rest
# Configuration defaults - none # Configuration defaults - none
# TODO: quick fix CONFIG_FILE="$HOME/.hackerbaserc"
CONFIG_FILE=/home/hackerbase/.hackerbaserc
CFG_BANK_DIR= CFG_BANK_DIR=
CFG_APIKEYS_FILE= CFG_APIKEYS_FILE=
ARG_BANK_DIR= ARG_BANK_DIR=

7
src/configuration.scm
View file

@ -47,6 +47,8 @@
(chicken time posix) (chicken time posix)
(chicken file) (chicken file)
(chicken io) (chicken io)
(chicken process-context)
(chicken pathname)
util-parser) util-parser)
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
@ -55,8 +57,9 @@
;; Where to load initial configuration from ;; Where to load initial configuration from
(define *etc-hackerbase* (make-parameter (define *etc-hackerbase* (make-parameter
(list "/etc/hackerbase" (list "/etc/hackerbase"
;; TODO: $HOME expansion (make-pathname
"/home/hackerbase/.hackerbaserc"))) (get-environment-variable "HOME")
".hackerbaserc"))))
;; Needed by multiple modules actually ;; Needed by multiple modules actually
(define *members-directory* (make-parameter #f)) (define *members-directory* (make-parameter #f))