diff options
| author | Přemysl Janouch <p.janouch@gmail.com> | 2016-04-28 23:25:29 +0200 |
|---|---|---|
| committer | Přemysl Janouch <p.janouch@gmail.com> | 2016-04-28 23:25:29 +0200 |
| commit | 2474b5f3f592736b97b292b8ba0e839eb7bdf267 (patch) | |
| tree | 10986a4e70f78286430e294100f91f629e59a90b /plugins/zyklonb/calc | |
| parent | d97f28e7f7b76b0e2d458baea5f46bc6cb9be0d5 (diff) | |
| download | xK-2474b5f3f592736b97b292b8ba0e839eb7bdf267.tar.gz xK-2474b5f3f592736b97b292b8ba0e839eb7bdf267.tar.xz xK-2474b5f3f592736b97b292b8ba0e839eb7bdf267.zip | |
calc: fix usage of (substring)
Diffstat (limited to 'plugins/zyklonb/calc')
| -rwxr-xr-x | plugins/zyklonb/calc | 2 |
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 --------------------------------------------------------------- |