Update of /home/spip-cvs/spip/ecrire
In directory miel:/tmp/cvs-serv12739/ecrire
Modified Files:
inc_import.php3
Log Message:
bug importation (klaus)
Index: inc_import.php3
RCS file: /home/spip-cvs/spip/ecrire/inc_import.php3,v
retrieving revision 1.24
retrieving revision 1.25
diff -u -d -r1.24 -r1.25
--- inc_import.php3 18 Nov 2003 21:07:48 -0000 1.24
+++ inc_import.php3 31 Dec 2003 00:22:16 -0000 1.25
@@ -18,7 +18,7 @@
$p = $pos;
$q = @strpos($buf, '<', $p);
- while (!$q AND $buf{$p} != '<') {
+ while (!$q AND substr($buf, $p, 1) != '<') {
if ($_feof($f)) return false;
$before .= substr($buf, $p);
$buf = $_fread($f, $buf_len);
@@ -29,7 +29,7 @@
$tag = '';
$p = ++$q;
$q = @strpos($buf, '>', $p);
- while (!$q AND $buf{$p} != '>') {
+ while (!$q AND substr($buf, $p, 1) != '>') {
if ($_feof($f)) return false;
$tag .= substr($buf, $p);
$buf = $_fread($f, $buf_len);