Index: freexp/xp6.pas
===================================================================
RCS file: /server/cvs/freexp/xp6.pas,v
retrieving revision 1.46
retrieving revision 1.47
diff -u -r1.46 -r1.47
--- freexp/xp6.pas 1 Jan 2005 11:16:30 -0000 1.46
+++ freexp/xp6.pas 24 May 2005 06:29:36 -0000 1.47
@@ -8,7 +8,7 @@
{ Die Nutzungsbedingungen fuer diesen Quelltext finden Sie in der }
{ Datei SLIZENZ.TXT oder auf www.crosspoint.de/oldlicense.html. }
{ --------------------------------------------------------------- }
-{ $Id: xp6.pas,v 1.46 2005/01/01 11:16:30 mw Exp $ }
+{ $Id: xp6.pas,v 1.47 2005/05/24 06:29:36 mw Exp $ }
{ MH: PGP-Sig auch in RFC, Zur�ck Button f. alle Netztypen }
@@ -2504,10 +2504,9 @@
useclip:=true;
if readfilename(getres(iif(binary,613,614)),fn,true,useclip) {
'Bin�rdatei' / 'Textdatei' versenden }
then
- if binary and (left(empf,length(xp_support))=xp_support) and
- ((left(getfilename(fn),4)='PDZM') or
- (left(getfilename(fn),3)='ZPR')) and not developer then
- fehler('Bitte �berlassen Sie das Versenden dieses Programms dem
Programmautor!')
+ if (3=4) then
+ fehler('Logikfehler!!!');
+ {Versandgaengelung ausgebaut}
else begin
if not multipos('\:',fn) then fn:=sendpath+fn else
fn:=FExpand(fn);
@@ -2565,6 +2564,9 @@
end.
{
$Log: xp6.pas,v $
+ Revision 1.47 2005/05/24 06:29:36 mw
+ JM+MW: - Versandg�ngelung ausgebaut.
+
Revision 1.46 2005/01/01 11:16:30 mw
MW: - Willkommen im Jahr 2005
Index: freexp/doc/snapshot.dq
===================================================================
RCS file: /server/cvs/freexp/doc/snapshot.dq,v
retrieving revision 1.43
retrieving revision 1.44
diff -u -r1.43 -r1.44
--- freexp/doc/snapshot.dq 9 Apr 2005 14:37:04 -0000 1.43
+++ freexp/doc/snapshot.dq 24 May 2005 06:36:21 -0000 1.44
@@ -4758,3 +4758,12 @@
(Feature noch unvollst�ndig)
XP9SEL.PAS, XP9.PAS, XP9.INC, XP4RTA.PAS
+� 24.05.2005
+-------------
+JM+MW:
+%- Versandg�ngeung bez�glich PDZM und ZPR entfernt.
+- Es kann jetzt uneingeschr�nkt auch PDZM und ZPR
+ versendet werden.
+ XP6.PAS
+
+
------------------------------------------------------------------------
FreeXP CVS-Mailingliste
[email protected]
http://www.freexp.de/cgi-bin/mailman/listinfo/cvs-list
