Fixing bug in find-string