Fixed bug where small strings would crash

2017-04-19 16:22:47 -04:00 · 2017-04-19 16:22:47 -04:00 · fe734a8893
commit fe734a8893
parent 240870e5d1
1 changed files with 1 additions and 1 deletions
--- a/Hermes_Gui1.2.rkt
+++ b/Hermes_Gui1.2.rkt
@ -75,7 +75,7 @@
          (if (eq? (string-ref str (+ start index)) #\~)
              (substring str start (+ start index))
              (helper str (+ index 1))))
-        (helper string start)))
+        (helper string 0)))
    
    (define (user-message onetrueinput)
      (begin