Browse Source

* ppudump: fixed reading of ibresource section

git-svn-id: trunk@41905 -
Jonas Maebe 6 năm trước cách đây
mục cha
commit
0225a3a39a

+ 2 - 2
compiler/utils/ppuutils/ppudump.pp

@@ -775,7 +775,7 @@ end;
 
 
 Procedure ReadContainer(const prefix:string);
 Procedure ReadContainer(const prefix:string);
 {
 {
-  Read a serie of strings and write to the screen starting every line
+  Read a series of strings and write to the screen starting every line
   with prefix
   with prefix
 }
 }
 begin
 begin
@@ -3838,7 +3838,7 @@ begin
 
 
          ibresources :
          ibresources :
            if not silent then
            if not silent then
-             ReadLinkContainer('Resource file: ');
+             ReadContainer('Resource file: ');
 
 
          iberror :
          iberror :
            begin
            begin