فهرست منبع

* don't check for directory in do_open (merged)

peter 25 سال پیش
والد
کامیت
7cac44dbaf
1فایلهای تغییر یافته به همراه5 افزوده شده و 11 حذف شده
  1. 5 11
      rtl/linux/syslinux.pp

+ 5 - 11
rtl/linux/syslinux.pp

@@ -415,15 +415,6 @@ Begin
      Oflags:=Oflags and not(Open_RDWR);
      FileRec(f).Handle:=sys_open(p,oflags,438);
    end;
-{ Check if it's a directory, then we should return io error 2 }
-  if ErrNo=0 then
-   begin
-     if (Sys_fstat(filerec(f).handle,dirtest)<>0) then
-      inoutres:=2
-     else
-      if (dirtest.mode and STAT_IFMT)<>STAT_IFREG then
-       inoutres:=2;
-   end;
   Errno2Inoutres;
 End;
 
@@ -789,7 +780,10 @@ End.
 
 {
   $Log$
-  Revision 1.4  2000-08-05 18:33:51  peter
+  Revision 1.5  2000-08-13 08:43:45  peter
+    * don't check for directory in do_open (merged)
+
+  Revision 1.4  2000/08/05 18:33:51  peter
     * paramstr(0) fix for linux 2.0 kernels (merged)
 
   Revision 1.3  2000/07/14 10:33:10  michael
@@ -797,5 +791,5 @@ End.
 
   Revision 1.2  2000/07/13 11:33:49  michael
   + removed logs
- 
+
 }