Pleets / SQLWebManager

      var dir = ranges[index].head.ch - baseCh;

      var newDir = headCh - baseCh;

      if (dir > 0 && newDir <= 0) {

        baseCh++;

        if (!isClipped) { headCh--; }

      } else if (dir < 0 && newDir >= 0) {

        baseCh--;

        if (!wasClipped) { headCh++; }

      } else if (dir < 0 && newDir == -1) {

        baseCh--;

        headCh++;

      }

      for (var line = firstLine; line <= lastLine; line++) {

        var range = {anchor: new Pos(line, baseCh), head: new Pos(line, headCh)};

        selections.push(range);

      var next = line.charAt(dir < 0 ? pos - 1 : pos);

      var cat = next != "_" && CodeMirror.isWordChar(next) ? "w" : "o";

      if (cat == "w" && next.toUpperCase() == next) cat = "W";

      if (state == "start") {

        if (cat != "o") { state = "in"; type = cat; }

      } else if (state == "in") {

        if (type != cat) {

          if (type == "w" && cat == "W" && dir < 0) pos--;

          if (type == "W" && cat == "w" && dir > 0) { type = "w"; continue; }

          break;

        }

      }

    }

    return Pos(start.line, pos);

  }