Skip to content

Commit

Permalink
Field (#25)
Browse files Browse the repository at this point in the history 
* fld1

* noedit0

* fieldev

* field1
  • Loading branch information
@freakout42
freakout42 authored Sep 3, 2024
1 parent fb67695 commit fe8113e
Show file tree
Hide file tree
Showing 17 changed files with 481 additions and 338 deletions.
427 changes: 225 additions & 202 deletions docs/DeveloperGuide.md
View file

Large diffs are not rendered by default.

5 changes: 4 additions & 1 deletion docs/UserGuide.md
View file
Original file line number Diff line number Diff line change
Expand Up @@ -87,7 +87,10 @@ categories:

Same behaviour as alphanumeric keys with the exception
of the shifted [1-9] keys which act as speed navigation
in non Edit-Mode for the respective fields.
in non Edit-Mode for the respective fields. And the
[Space] key which toggles true/false for boolean fields.
And the [+] and [-] keys which increment or decrement
integer fields.

- Navigation = [Left] [Right] [Up] [Down] [PageUp] [PageDn]
[Home] [End] [Tab] [Backtab]
Expand Down
2 changes: 1 addition & 1 deletion generate/Makefile
View file
Original file line number Diff line number Diff line change
Expand Up @@ -20,5 +20,5 @@ scotty.inp: testform makeform
./testform >$@

clean:
rm -f formax.frm scotty.inp scotty.frm* scotty.sq3 ads_* adjfield runform
rm -f formax.frm* scotty.inp scotty.frm* scotty.sq3 ads_* adjfield runform

2 changes: 1 addition & 1 deletion generate/adjfield.c
View file
Original file line number Diff line number Diff line change
Expand Up @@ -16,7 +16,7 @@ int main() {
f[0] = NXT;
f[1] = t = NXT;
len = 2;
while(t != '\n' && (t == '_' || (t >= '0' && t <= '9'))) { t = NXT; len++; }
while(t == '_' || t == '.' || (t >= '0' && t <= '9')) { len = t=='.' ? 1 : len+1; t = NXT; }
printf("UPDATE fields set line = %d, col = %d, dlen = %d where id = %d;\n", line, act, len, atoi(f));
}
if (t == '\n') {
Expand Down
15 changes: 13 additions & 2 deletions generate/editform
View file
Original file line number Diff line number Diff line change
@@ -1,4 +1,15 @@
#!/bin/sh
if [ "`dirname $0`" = "." ]; then
ADJFIELD=./adjfield
RUNFORM=../runform/runform
FORMAXFRM=formax.frm
LOGGING=-g/tmp/formax.log
else
ADJFIELD=adjfield
RUNFORM=runform
FORMAXFRM=${ARX:-/opt/arx}/lib/formax.frm
LOGGING=""
fi
FORM=$1
if ! cp -v $FORM.frm $FORM.frm.bac; then
echo "$FORM.frm not found" >&2
Expand All @@ -13,9 +24,9 @@ IFS=% sed "s/^/'/;s/\$/'/" $FORM.map | while read TEXT; do
LINE=`expr $LINE + 1`
$SQL "insert into maps (line, mtext) values ($LINE, $TEXT)"
done
${ARX:-/opt/arx}/bin/adjfield <$FORM.map | $SQL
$ADJFIELD <$FORM.map | $SQL
rm $FORM.map
${ARX:-/opt/arx}/bin/runform -x ${ARX:-/opt/arx}/lib/formax.frm $FORM.frm
$RUNFORM $LOGGING -x $FORMAXFRM $FORM.frm
$SQL .dump >$FORM.inp
${EDITOR:-vi} $FORM.inp
rm $FORM.frm
Expand Down
62 changes: 31 additions & 31 deletions generate/formax.inp
View file
Original file line number Diff line number Diff line change
Expand Up @@ -83,22 +83,22 @@ INSERT INTO fields VALUES(6,1,1,1,'seq',60,0,30,3,1,0,'',5,7,1,1,1,1,0,0,'',0,0,
INSERT INTO fields VALUES(7,1,1,1,'ftype',70,0,30,2,1,0,'',5,21,1,1,1,1,0,0,'',0,0,0,0,'','');
INSERT INTO fields VALUES(8,1,1,1,'len',80,0,30,2,1,0,'',6,21,1,1,1,1,0,0,'',0,0,0,0,'','');
INSERT INTO fields VALUES(9,1,1,1,'dlen',68,0,30,3,1,0,'',8,7,1,1,1,1,0,0,'',0,0,0,0,'','');
INSERT INTO fields VALUES(10,1,1,1,'btab',100,0,30,3,1,0,'',7,21,1,1,1,1,0,0,'',0,0,0,0,'','');
INSERT INTO fields VALUES(11,1,1,1,'key',110,0,30,3,1,0,'',7,30,1,1,1,1,0,0,'',0,0,0,0,'','');
INSERT INTO fields VALUES(10,1,1,1,'btab',100,0,30,1,1,0,'',7,21,1,1,1,1,0,0,'',0,0,0,0,'','');
INSERT INTO fields VALUES(11,1,1,1,'key',110,0,30,1,1,0,'',7,31,1,1,1,1,0,0,'',0,0,0,0,'','');
INSERT INTO fields VALUES(12,1,1,1,'dflt',120,0,30,20,1,0,'',8,21,1,1,1,1,0,0,'',0,0,0,0,'','');
INSERT INTO fields VALUES(13,1,1,1,'line',65,0,30,3,1,0,'',6,7,1,1,1,1,0,0,'',0,0,0,0,'','');
INSERT INTO fields VALUES(14,1,1,1,'col',66,0,30,3,1,0,'',7,7,1,1,1,1,0,0,'',0,0,0,0,'','');
INSERT INTO fields VALUES(15,1,1,1,'enter',150,0,30,3,1,0,'',11,13,1,1,1,1,0,0,'',0,0,0,0,'','');
INSERT INTO fields VALUES(16,1,1,1,'query',160,0,30,3,1,0,'',12,13,1,1,1,1,0,0,'',0,0,0,0,'','');
INSERT INTO fields VALUES(17,1,1,1,'upd',170,0,30,3,1,0,'',13,13,1,1,1,1,0,0,'',0,0,0,0,'','');
INSERT INTO fields VALUES(18,1,1,1,'updnul',180,0,30,3,1,0,'',14,13,1,1,1,1,0,0,'',0,0,0,0,'','');
INSERT INTO fields VALUES(19,1,1,1,'mand',190,0,30,3,1,0,'',15,13,1,1,1,1,0,0,'',0,0,0,0,'','');
INSERT INTO fields VALUES(20,1,1,1,'upper',200,0,30,3,1,0,'',16,13,1,1,1,1,0,0,'',0,0,0,0,'','');
INSERT INTO fields VALUES(15,1,1,1,'enter',150,0,30,1,1,0,'',11,13,1,1,1,1,0,0,'',0,0,0,0,'','');
INSERT INTO fields VALUES(16,1,1,1,'query',160,0,30,1,1,0,'',12,13,1,1,1,1,0,0,'',0,0,0,0,'','');
INSERT INTO fields VALUES(17,1,1,1,'upd',170,0,30,1,1,0,'',13,13,1,1,1,1,0,0,'',0,0,0,0,'','');
INSERT INTO fields VALUES(18,1,1,1,'updnul',180,0,30,1,1,0,'',14,13,1,1,1,1,0,0,'',0,0,0,0,'','');
INSERT INTO fields VALUES(19,1,1,1,'mand',190,0,30,1,1,0,'',15,13,1,1,1,1,0,0,'',0,0,0,0,'','');
INSERT INTO fields VALUES(20,1,1,1,'upper',200,0,30,1,1,0,'',16,13,1,1,1,1,0,0,'',0,0,0,0,'','');
INSERT INTO fields VALUES(21,1,1,1,'lovtit',210,0,30,20,1,0,'',17,13,1,1,1,1,0,0,'',0,0,0,0,'','');
INSERT INTO fields VALUES(22,1,1,1,'lov_id',220,0,30,3,1,0,'',17,36,1,1,1,1,0,0,'',0,0,0,0,'','');
INSERT INTO fields VALUES(23,1,1,1,'lovi_id',230,0,30,3,1,0,'',17,42,1,1,1,1,0,0,'',0,0,0,0,'','');
INSERT INTO fields VALUES(24,1,1,1,'low',240,0,30,11,1,0,'',20,13,1,1,1,1,0,0,'',0,0,0,0,'','');
INSERT INTO fields VALUES(25,1,1,1,'high',250,0,30,11,1,0,'',20,36,1,1,1,1,0,0,'',0,0,0,0,'','');
INSERT INTO fields VALUES(25,1,1,1,'high',250,0,30,11,1,0,'',20,30,1,1,1,1,0,0,'',0,0,0,0,'','');
INSERT INTO fields VALUES(26,1,1,1,'valpatn',260,0,30,34,1,0,'',21,13,1,1,1,1,0,0,'',0,0,0,0,'','');
INSERT INTO fields VALUES(27,1,1,1,'help',55,0,30,40,1,0,'',2,13,1,1,1,1,0,0,'',0,0,0,0,'','');
CREATE TABLE maps
Expand All @@ -107,27 +107,27 @@ CREATE TABLE maps
line INTEGER NOT NULL DEFAULT 1,
mtext TEXT NOT NULL DEFAULT ''
);
INSERT INTO maps VALUES(212,1,1,' Id $1 / $2 $3 blkn $4 pagn $5______________________');
INSERT INTO maps VALUES(213,1,2,' Help $27_____________________________________');
INSERT INTO maps VALUES(214,1,3,'');
INSERT INTO maps VALUES(215,1,4,' Layout Properties');
INSERT INTO maps VALUES(216,1,5,' Seq $6_ Type $7 0:ALL 1:CHAR 2:INT 3:FLOAT 4:DATE');
INSERT INTO maps VALUES(217,1,6,' Line $13 Length $8');
INSERT INTO maps VALUES(218,1,7,' Col $14 Table $10 Pkey $11');
INSERT INTO maps VALUES(219,1,8,' Dlen $9_ Default $12_________________');
INSERT INTO maps VALUES(220,1,9,'');
INSERT INTO maps VALUES(221,1,10,' Action');
INSERT INTO maps VALUES(222,1,11,' Enter $15');
INSERT INTO maps VALUES(223,1,12,' Query $16');
INSERT INTO maps VALUES(224,1,13,' Update $17');
INSERT INTO maps VALUES(225,1,14,' UpdateNul $18');
INSERT INTO maps VALUES(226,1,15,' Mandatory $19');
INSERT INTO maps VALUES(227,1,16,' Uppercase $20 Blk Id');
INSERT INTO maps VALUES(228,1,17,' ListOfVal $21_________________ / $22 / $23');
INSERT INTO maps VALUES(229,1,18,'');
INSERT INTO maps VALUES(230,1,19,' Validation');
INSERT INTO maps VALUES(231,1,20,' Low $24________ High $25________');
INSERT INTO maps VALUES(232,1,21,' Pattern $26_______________________________');
INSERT INTO maps VALUES(401,1,1,' Id $1 / $2 $3 blkn $4 pagn $5______________________');
INSERT INTO maps VALUES(402,1,2,' Help $27_____________________________________');
INSERT INTO maps VALUES(403,1,3,'');
INSERT INTO maps VALUES(404,1,4,' Layout Database');
INSERT INTO maps VALUES(405,1,5,' Seq $6_ Type $7 0:ALL 1:CHAR 2:INT 3:FLOAT 4:DATE');
INSERT INTO maps VALUES(406,1,6,' Line $13 Length $8');
INSERT INTO maps VALUES(407,1,7,' Col $14 Table $10. Pkey $11. ');
INSERT INTO maps VALUES(408,1,8,' Dlen $9_ Default $12_________________');
INSERT INTO maps VALUES(409,1,9,'');
INSERT INTO maps VALUES(410,1,10,' Action');
INSERT INTO maps VALUES(411,1,11,' Enter $15. edit in Insert-Mode');
INSERT INTO maps VALUES(412,1,12,' Query $16. edit in Query-Mode');
INSERT INTO maps VALUES(413,1,13,' Update $17. edit in Update-Mode');
INSERT INTO maps VALUES(414,1,14,' UpdateNul $18. edit in Update-Mode if NULL');
INSERT INTO maps VALUES(415,1,15,' Mandatory $19. must in Insert-Mode');
INSERT INTO maps VALUES(416,1,16,' Uppercase $20. convert uppercase Blk Id');
INSERT INTO maps VALUES(417,1,17,' ListOfVal $21_________________ / $22 / $23');
INSERT INTO maps VALUES(418,1,18,'');
INSERT INTO maps VALUES(419,1,19,' Validation');
INSERT INTO maps VALUES(420,1,20,' Low $24________ High $25________');
INSERT INTO maps VALUES(421,1,21,' Pattern $26_______________________________');
CREATE TABLE pages
(id INTEGER PRIMARY KEY AUTOINCREMENT NOT NULL,
form_id INTEGER NOT NULL DEFAULT 1,
Expand Down Expand Up @@ -159,5 +159,5 @@ INSERT INTO triggers VALUES(1,1,'enter_the_form',0,0,0,'0');
DELETE FROM sqlite_sequence;
INSERT INTO sqlite_sequence VALUES('triggers',1);
INSERT INTO sqlite_sequence VALUES('pages',1);
INSERT INTO sqlite_sequence VALUES('maps',232);
INSERT INTO sqlite_sequence VALUES('maps',421);
COMMIT;
30 changes: 15 additions & 15 deletions generate/scotty.sql
View file
Original file line number Diff line number Diff line change
Expand Up @@ -15,20 +15,20 @@ create table emps
mgr integer,
hiredate text,
sal real,
comm real,
comm integer,
dept_id integer
);
insert into emps values (7369, 'MC''SMITH', 'CLERK', 7902, '1980-12-17', 800, NULL, 20);
insert into emps values (7499, 'ALLEN', 'SALESMAN', 7698, '1981-02-20', 1600, 300, 30);
insert into emps values (7521, 'WARD', 'SALESMAN', 7698, '1981-02-22', 1250, 500, 30);
insert into emps values (7566, 'JONES', 'MANAGER', 7839, '1981-04-02', 2975, NULL, 20);
insert into emps values (7654, 'MARTIN', 'SALESMAN', 7698, '1981-09-28', 1250, 1400, 30);
insert into emps values (7698, 'BLAKE', 'MANAGER', 7839, '1981-05-01', 2850, NULL, 30);
insert into emps values (7782, 'CLARK', 'MANAGER', 7839, '1981-06-09', 2450, NULL, 10);
insert into emps values (7788, 'SCOTT', 'ANALYST', 7566, '1987-04-19', 3000, NULL, 20);
insert into emps values (7839, 'KING', 'PRESIDENT', NULL, '1981-11-17', 5000, NULL, 10);
insert into emps values (7844, 'TURNER', 'SALESMAN', 7698, '1981-09-08', 1500, 0, 30);
insert into emps values (7876, 'ADAMS', 'CLERK', 7788, '1987-05-23', 1100, NULL, 20);
insert into emps values (7900, 'JAMES', 'CLERK', 7698, '1981-12-03', 950, NULL, 30);
insert into emps values (7902, 'FORD', 'ANALYST', 7566, '1981-12-03', 3000, NULL, 20);
insert into emps values (7934, 'MILLER', 'CLERK', 7782, '1982-01-23', 1300, NULL, 10);
insert into emps values (7369, 'MC''SMITH', 'CLERK', 7902, '1980-12-17', NULL, 0, 20);
insert into emps values (7499, 'ALLEN', 'SALESMAN', 7698, '1981-02-20', 1600, 0, 30);
insert into emps values (7521, 'WARD', 'SALESMAN', 7698, '1981-02-22', 1250, 1, 30);
insert into emps values (7566, 'JONES', 'MANAGER', 7839, '1981-04-02', 2975, 0, 20);
insert into emps values (7654, 'MARTIN', 'SALESMAN', 7698, '1981-09-28', 1250, 0, 30);
insert into emps values (7698, 'BLAKE', 'MANAGER', 7839, '1981-05-01', 2850, 1, 30);
insert into emps values (7782, 'CLARK', 'MANAGER', 7839, '1981-06-09', 2450, 0, 10);
insert into emps values (7788, 'SCOTT', 'ANALYST', 7566, '1987-04-19', 3000, 1, 20);
insert into emps values (7839, 'KING', 'PRESIDENT', NULL, '1981-11-17', 5000, 1, 10);
insert into emps values (7844, 'TURNER', 'SALESMAN', 7698, '1981-09-08', 1500, 0, 30);
insert into emps values (7876, 'ADAMS', 'CLERK', 7788, '1987-05-23', 1100, 1, 20);
insert into emps values (7900, 'JAMES', 'CLERK', 7698, '1981-12-03', 950, 0, 30);
insert into emps values (7902, 'FORD', 'ANALYST', 7566, '1981-12-03', 3000, 0, 20);
insert into emps values (7934, 'MILLER', 'CLERK', 7782, '1982-01-23', 1300, 0, 10);
4 changes: 3 additions & 1 deletion generate/testform
View file
Original file line number Diff line number Diff line change
Expand Up @@ -9,8 +9,10 @@ echo "UPDATE maps set mtext = mtext || ' $1' where line = $LINE;"
}
ARX=`pwd`/.. sh ./makeform scotty formax1 emps id ename job mgr hiredate sal comm dept_id
cat <<EOF
UPDATE fields set valpatn = '\d\d\d\d' where id=4;
UPDATE fields set ftype = 2, dlen = 4, len = 4, low = 7000, high = 8999, valpatn = '\d\d\d\d' where id=4;
UPDATE fields set ftype = 4 where id=5;
UPDATE fields set upd = 0 where id=6;
UPDATE fields set ftype = 2, dlen = 1, len = 1, low = 0, high = 1 where id=7;
EOF
LINE=9
LINE=`expr $LINE + 1`
Expand Down
5 changes: 2 additions & 3 deletions runform/Makefile
View file
Original file line number Diff line number Diff line change
Expand Up @@ -37,9 +37,8 @@ crypt/libmd5.a:
cd crypt; make

$(EXAMPLE):
cd ../generate; make test
cd ../generate; make clean test

clean:
for D in colquery regex elk crypt; do ( cd $$D; make clean; ); done
rm -f *.o a.out *core.* runform curkeys curkeys.h test afiedt.buf /tmp/odbc.log ads_*

rm -f *.o a.out *core.* runform curkeys curkeys.h test afiedt.buf /tmp/odbc.log ads_* $(EXAMPLE)
149 changes: 102 additions & 47 deletions runform/field.cpp
View file
Original file line number Diff line number Diff line change
Expand Up @@ -40,22 +40,36 @@ sequencenum = F(b[blockindex].addattribute)(rix-1);
return 0;
}

int Field::noedit() {
switch(CM) {
case MOD_UPDATE: if (isprimarykey || !(updateable || (updnulable && *valuep()==NULL))) return 1; break;
case MOD_QUERY: if (!queryable) return 1; break;
case MOD_INSERT: if (!enterable) return 1; break;
case MOD_DELETE: break;
}
return 0;
}

ftype Field::fldtype() {
return (fieldtype==FTY_INT && lowvalue==0 && highvalue==1) ? FTY_BOOL : fieldtype;
}

void Field::show(int cur) {
int color;
switch(F(rmode)) {
switch(CM) {
case MOD_QUERY: color = COL_QUERY; break;
case MOD_INSERT: color = COL_NEWREC; break;
case MOD_DELETE: color = COL_DELETED; break;
default: color = COL_FIELD;
}
if (cur && F(rmode) != MOD_DELETE) color = COL_CURRENT;
F(p[1].writef)(line, col, color, displaylen, "%.*s", displaylen, F(rmode)==MOD_QUERY ? queryhuman : *valuep());
if (cur && CM != MOD_DELETE) color = COL_CURRENT;
F(p[1].writef)(line, col, color, displaylen, "%.*s", displaylen, CM==MOD_QUERY ? queryhuman : *valuep());
if (cur) F(p[1].wmov)(line, col);
}

void Field::clear() {
char **v;
if (F(rmode) == MOD_QUERY) {
if (CM == MOD_QUERY) {
*queryhuman = '\0';
*querywhere = '\0';
} else {
Expand All @@ -69,63 +83,104 @@ char **Field::valuep() {
return F(b[blockindex].q->w)(CB.currentrecord, sequencenum);
}

int Field::edit(int pos) {
int Field::toggle() {
char **c;
if (CM == MOD_UPDATE && fldtype() == FTY_BOOL) {
c = valuep();
if (*c && strlen(*c)==1) {
switch (**c) {
case '0': **c = '1'; return KEF_NXTFLD;
case '1': **c = '0'; return KEF_NXTFLD;
}
}
}
return 0;
}

int Field::increment(int ival) {
char **c;
int a;
char buf2[SMLSIZE];
if (CM == MOD_UPDATE && fieldtype == FTY_INT) {
c = valuep();
if (*c) {
a = atoi(*c) + ival;
letf(t(buf2), "%d", a);
if (validate(c, buf2) != KEF_CANCEL) return 0; // KEF_NXTFLD;
}
}
return 0;
}

int Field::validate(char **c, char *buf) {
char *u;
re_t re;
int s;
char buf2[SMLSIZE];
if (*validreg) {
re = re_compile(validreg);
if (re_matchp(re, buf, &s) == -1) { // || s != (int)strlen(buf)
MSG1(MSG_NOMATCH, validreg);
return KEF_CANCEL;
}
}
switch (fieldtype) {
case FTY_DATE:
s = colquery(buf, buf2, "q", 0, 268);
if (*buf2 == '{' && (u = rindex(buf2, ' ')) && u == buf2+strlen(buf2)-9) {
strncpy(buf, u+1, 4);
*(buf+4) = '-';
strncpy(buf+5, u+5, 2);
*(buf+7) = '-';
strncpy(buf+8, u+7, 2);
*(buf+10) = '\0';
}
re = re_compile("^[12]\\d\\d\\d-[012]\\d-[0123]\\d$");
if (re_matchp(re, buf, &s) == -1) {
MSG1(MSG_NOMATCH, "YYYY-MM-DD");
return KEF_CANCEL;
}
break;
case FTY_INT:
case FTY_BOOL:
if (lowvalue + highvalue != 0 && (lowvalue > atoi(buf) || highvalue < atoi(buf))) {
letf(t(buf2), "%d - %d", lowvalue, highvalue);
MSG1(MSG_NORANGE, buf2);
return KEF_CANCEL;
}
break;
case FTY_FLOAT: break;
case FTY_CHAR: break;
case FTY_ALL: break;
}
if (*c==NULL && *buf) *c = strdup(buf);
else {
if (strlen(buf) > strlen(*c)) *c = (char*)realloc(*c, strlen(buf)+1);
if (strcmp(*c, buf)) strcpy(*c, buf);
}
return 0;
}

int Field::edit(int pos) {
int pressed;
char buf[SMLSIZE];
char buf2[SMLSIZE];
char *u;
char **c;
re_t re;
int s;
pressed = 0;
switch(F(rmode)) {
switch(CM) {
case MOD_UPDATE:
if (isprimarykey) { MSG(MSG_EDITKEY); return KEF_CANCEL; }
case MOD_INSERT:
if (!updateable) { MSG(MSG_FLDPROT); return KEF_CANCEL; }
if (noedit()) { MSG(MSG_FLDPROT); return KEF_CANCEL; }
if (F(b[blockindex].q->rows)) {
c = valuep();
if (*c) let(buf, *c); else *buf = '\0';
pressed = F(p[0].sedit)(buf, pos, fieldtype);
if (*validreg) {
re = re_compile(validreg);
if (re_matchp(re, buf, &s) == -1) { // || s != (int)strlen(buf)
MSG1(MSG_NOMATCH, validreg);
return KEF_CANCEL;
}
}
// missing range validation
switch (fieldtype) {
case FTY_DATE:
s = colquery(buf, buf2, "q", 0, 268);
if (*buf2 == '{' && (u = rindex(buf2, ' ')) && u == buf2+strlen(buf2)-9) {
strncpy(buf, u+1, 4);
*(buf+4) = '-';
strncpy(buf+5, u+5, 2);
*(buf+7) = '-';
strncpy(buf+8, u+7, 2);
*(buf+10) = '\0';
}
re = re_compile("^[12]\\d\\d\\d-[012]\\d-[0123]\\d$");
if (re_matchp(re, buf, &s) == -1) {
MSG1(MSG_NOMATCH, "YYYY-MM-DD");
return KEF_CANCEL;
}
break;
case FTY_ALL:
case FTY_INT:
case FTY_FLOAT:
case FTY_CHAR: break;
}
if (*c==NULL && *buf) *c = strdup(buf);
else {
if (strlen(buf) > strlen(*c)) *c = (char*)realloc(*c, strlen(buf)+1);
if (strcmp(*c, buf)) strcpy(*c, buf);
}
pressed = F(p[0].sedit)(buf, pos, fldtype(), fieldlen);
if (pressed != KEF_CANCEL && validate(c, buf) == KEF_CANCEL) pressed = KEF_CANCEL;
}
break;
case MOD_QUERY:
pressed = F(p[0].sedit)(queryhuman, pos, FTY_ALL);
pressed = F(p[0].sedit)(queryhuman, pos, FTY_ALL, SMLSIZE);
s = colquery(queryhuman, querywhere, name, querycharm, 0);
break;
case MOD_DELETE:
Expand Down
Loading

0 comments on commit fe8113e

Please sign in to comment.