From 2474b5f3f592736b97b292b8ba0e839eb7bdf267 Mon Sep 17 00:00:00 2001 From: Přemysl Janouch Date: Thu, 28 Apr 2016 23:25:29 +0200 Subject: calc: fix usage of (substring) --- plugins/zyklonb/calc | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'plugins/zyklonb/calc') diff --git a/plugins/zyklonb/calc b/plugins/zyklonb/calc index deea424..1df0596 100755 --- a/plugins/zyklonb/calc +++ b/plugins/zyklonb/calc @@ -89,7 +89,7 @@ (let ([s-len (string-length s)] [with-len (string-length start)]) (and (>= s-len with-len) (string=? (substring s 0 with-len) start) - (substring s with-len)))) + (substring s with-len s-len)))) ; --- Calculator --------------------------------------------------------------- -- cgit v1.2.3-70-g09d2