From 041ae59c960496b5c780730a4df98dddf841d961 Mon Sep 17 00:00:00 2001 From: m455 Date: Thu, 5 Apr 2018 23:48:41 -0400 Subject: [PATCH] removed an error --- rodo.rkt | 5 ++--- 1 file changed, 2 insertions(+), 3 deletions(-) diff --git a/rodo.rkt b/rodo.rkt index c523571..c7cc54d 100755 --- a/rodo.rkt +++ b/rodo.rkt @@ -8,7 +8,7 @@ (define program-path "~/") (define (d-hash-ref hash-list key) - (display (hash-ref messages key))) + (display (hash-ref hash-list key))) (define (d-vector-ref args key) (display (vector-ref args key))) @@ -78,8 +78,7 @@ (define (open/create-file) (let ([path (expand-user-path (string-append program-path - program-directory - list-name))]) + program-directory))]) (let ([opened-file (open-output-file path #:mode 'text #:exists 'can-update)])