use relative paths when opening files

This commit is contained in:
Ibrahim Mkusa 2017-04-16 18:45:22 -04:00
parent ed029f7906
commit 684f172537
3 changed files with 4 additions and 3 deletions

1
.gitignore vendored
View File

@ -1,5 +1,6 @@
# ignore temporary files
*~
*.txt
# ignore logs and configuration files
*.out

View File

@ -1,3 +1,3 @@
# Remove temporary files
clean:
rm -rf *~ *.out *.conf
rm -rf *~ *.out *.conf *.txt

View File

@ -77,8 +77,8 @@
(define messages-s (make-semaphore 1)) ;; control access to messages
; two files to store error messages, and channel conversations
(define error-out (open-output-file "/home/pcuser/Hermes/Hermes/error_server.txt" #:exists 'append))
(define convs-out (open-output-file "/home/pcuser/Hermes/Hermes/conversations_server.txt" #:exists 'append))
(define error-out (open-output-file "./error_server.txt" #:exists 'append))
(define convs-out (open-output-file "./conversations_server.txt" #:exists 'append))
(define error-out-s (make-semaphore 1))
(define convs-out-s (make-semaphore 1))
; TODO finish logging all error related messages to