summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorPřemysl Janouch <p.janouch@gmail.com>2016-04-28 23:25:29 +0200
committerPřemysl Janouch <p.janouch@gmail.com>2016-04-28 23:25:29 +0200
commit2474b5f3f592736b97b292b8ba0e839eb7bdf267 (patch)
tree10986a4e70f78286430e294100f91f629e59a90b
parentd97f28e7f7b76b0e2d458baea5f46bc6cb9be0d5 (diff)
downloadxK-2474b5f3f592736b97b292b8ba0e839eb7bdf267.tar.gz
xK-2474b5f3f592736b97b292b8ba0e839eb7bdf267.tar.xz
xK-2474b5f3f592736b97b292b8ba0e839eb7bdf267.zip
calc: fix usage of (substring)
-rwxr-xr-xplugins/zyklonb/calc2
1 files changed, 1 insertions, 1 deletions
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 ---------------------------------------------------------------