diff --git a/scsh/encryption/dictionary.scm b/scsh/encryption/dictionary.scm
index bf18c59..9cd70d0 100644
--- a/scsh/encryption/dictionary.scm
+++ b/scsh/encryption/dictionary.scm
@@ -40,7 +40,7 @@
       (do ((j 0 (+ j 1))
            (l *dict (cdr l)))
           ((= j i)
-           (cadar l));;returns value
+           (car l));;returns value
         ))
 
     (define (set-with-index i value) ;; set value