Index: freexp/maske.inc
===================================================================
RCS file: /server/cvs/freexp/maske.inc,v
retrieving revision 1.19
retrieving revision 1.21
diff -u -r1.19 -r1.21
--- freexp/maske.inc 30 May 2005 07:06:28 -0000 1.19
+++ freexp/maske.inc 31 May 2005 07:01:07 -0000 1.21
@@ -8,7 +8,7 @@
{ Die Nutzungsbedingungen fuer diesen Quelltext finden Sie in der }
{ Datei SLIZENZ.TXT oder auf www.crosspoint.de/oldlicense.html. }
{ --------------------------------------------------------------- }
-{ $Id: maske.inc,v 1.19 2005/05/30 07:06:28 mw Exp $ }
+{ $Id: maske.inc,v 1.21 2005/05/31 07:01:07 mw Exp $ }
{----------------------------- MAIN --------------------------}
@@ -916,17 +916,17 @@
if xtest1(s^) then cont^:=s^;
end;
end;
- if ((t=^T) or (t=#127)) and (mask='') then begin
-{ if ((t=^T) or (t=#127) or (t=keycdel)) and (mask='') then }
-{ if (t=keycdel) and replace then begin }
-{ t:=^Y; }
-{ hisdel:=true; }
-{ pushkey(keyesc); }
-{ end else begin }
+ { if ((t=^T) or (t=#127)) and (mask='') then begin }
+ if ((t=^T) or (t=#127) or (t=keycdel)) and (mask='') then
+ if (t=keycdel) and replace then begin
+ t:=^Y;
+ hisdel:=true;
+ pushkey(keyesc);
+ end else begin
i:=p+ax;
if (t=^T ) or (t=keycdel) then begin
- while (i<=length(cont^)) and (cont^[i]<>' ') do inc(i);
- while (i<=length(cont^)) and (cont^[i]=' ') do inc(i);
+ while (i<=length(cont^)) and ((cont^[i]<>' ') and not
(cont^[i]='\')) do inc(i);
+ while (i<=length(cont^)) and ((cont^[i]=' ') or (cont^[i]='\')) do
inc(i);
end
else begin
while (p+ax>1) and (cont^[p+ax-1]<>' ') do links;
@@ -1131,6 +1131,12 @@
end; { readmask }
{
$Log: maske.inc,v $
+ Revision 1.21 2005/05/31 07:01:07 mw
+ MW: - Patchfehler beseitigt
+
+ Revision 1.20 2005/05/31 06:38:52 mw
+ MW+JM: - Aktivierung von History-L�schen
+
Revision 1.19 2005/05/30 07:06:28 mw
JM: - Die erweiterte History geht weiter:
Hinweise:
Index: freexp/xp1o.pas
===================================================================
RCS file: /server/cvs/freexp/xp1o.pas,v
retrieving revision 1.45
retrieving revision 1.46
diff -u -r1.45 -r1.46
--- freexp/xp1o.pas 30 May 2005 06:54:09 -0000 1.45
+++ freexp/xp1o.pas 31 May 2005 06:38:52 -0000 1.46
@@ -8,7 +8,7 @@
{ Die Nutzungsbedingungen fuer diesen Quelltext finden Sie in der }
{ Datei SLIZENZ.TXT oder auf www.crosspoint.de/oldlicense.html. }
{ --------------------------------------------------------------- }
-{ $Id: xp1o.pas,v 1.45 2005/05/30 06:54:09 mw Exp $ }
+{ $Id: xp1o.pas,v 1.46 2005/05/31 06:38:52 mw Exp $ }
{ Overlay-Teil zu xp1 }
@@ -113,7 +113,7 @@
s6:=lastpath6; s11:=lastpath11;
s7:=lastpath7; s12:=lastpath12;
s8:=lastpath8; s13:=lastpath13;
-{ if s='' then s:=iifs(useclip,'Clipboard',lastpath); }
+ if s='' then s:=iifs(useclip,'Clipboard',lastpath);
if s='' then s:=lastpath;
if (s='*.*') and not useclip then
s:=left(lastpath,rightpos('\',lastpath))+s;
maddstring(3,2,fn,s,37,MaxLenPathname,''); { Dateiname: }
@@ -1092,6 +1092,9 @@
end.
{
$Log: xp1o.pas,v $
+ Revision 1.46 2005/05/31 06:38:52 mw
+ MW+JM: - Aktivierung von History-L�schen
+
Revision 1.45 2005/05/30 06:54:09 mw
JM: - Erweiterte History eingebaut
( Die letzten 10 Dateinamen werden beim Extraieren als Defaults
Index: freexp/xp9sel.pas
===================================================================
RCS file: /server/cvs/freexp/xp9sel.pas,v
retrieving revision 1.13
retrieving revision 1.15
diff -u -r1.13 -r1.15
--- freexp/xp9sel.pas 27 May 2005 06:11:22 -0000 1.13
+++ freexp/xp9sel.pas 31 May 2005 06:42:02 -0000 1.15
@@ -8,7 +8,7 @@
{ Die Nutzungsbedingungen fuer diesen Quelltext finden Sie in der }
{ Datei SLIZENZ.TXT oder auf www.crosspoint.de/oldlicense.html. }
{ --------------------------------------------------------------- }
-{ $Id: xp9sel.pas,v 1.13 2005/05/27 06:11:22 mw Exp $ }
+{ $Id: xp9sel.pas,v 1.15 2005/05/31 06:42:02 mw Exp $ }
{ CrossPoint - UniSel: Select-/Test-Routinen fuer Unisel-Men�s }
@@ -2067,13 +2067,13 @@
HighlightName:=ustr(user);
aufbau:=true;
end;
- { if not dispusername then }
- { begin }
+ if not dispusername then
+ begin
message(getres(910) + adresse +
iifs(real='','',' ('+real+')')); { 'Username: '
}
mdelay(1000);
closebox;
- { end; }
+ end;
end;
end;
dbClose(d);
@@ -2085,6 +2085,12 @@
{
$Log: xp9sel.pas,v $
+ Revision 1.15 2005/05/31 06:42:02 mw
+ MW: - Fehler aus letzten Commit
+
+ Revision 1.14 2005/05/31 06:04:51 mw
+ MW: - Fehlerhaften Bugfix entfernt
+
Revision 1.13 2005/05/27 06:11:22 mw
JM: - bei eingeschalteter Anzeige der Stammbox in der 3.Zeile
( unter c/a/d ) zeigt *setuser nicht mehr die �nderungen an den
Index: freexp/doc/snapshot.dq
===================================================================
RCS file: /server/cvs/freexp/doc/snapshot.dq,v
retrieving revision 1.48
retrieving revision 1.49
diff -u -r1.48 -r1.49
--- freexp/doc/snapshot.dq 30 May 2005 07:14:23 -0000 1.48
+++ freexp/doc/snapshot.dq 31 May 2005 06:40:40 -0000 1.49
@@ -4769,13 +4769,7 @@
� 27.05.2005
-------------
JM:
-%! �bernahme dreier Bugfixe aus JMs Privatversion
-
-- bei eingeschalteter Anzeige der Stammbox in der 3.Zeile
- ( unter c/a/d ) zeigt *setuser nicht mehr die �nderungen an den
- Eintr�gen anderer Boxen an ( Best�tigungsmeldung fehlt )
- XP9SEL.PAS
-
+%! �bernahme zweier Bugfixe aus JMs Privatversion
- 3 kleine Darstellungsbugs bei der Nachrichtenkopf-Anzeige mit
"I" behoben, wo das Leerzeichen nach dem Doppelpunkt die Farbe
der Men�bezeichner erhielt.
------------------------------------------------------------------------
FreeXP CVS-Mailingliste
[email protected]
http://www.freexp.de/cgi-bin/mailman/listinfo/cvs-list
