Code Duplication    Length = 4-4 lines in 2 locations

main/inc/lib/pclzip/pclzip.lib.php 2 locations

@@ 5509-5512 (lines=4) @@
5506
    $v_result = 1;
5507
5508
    // ----- Look for path beginning by ./
5509
    if (   ($p_dir == '.')
5510
        || ((strlen($p_dir) >=2) && (substr($p_dir, 0, 2) == './'))) {
5511
      $p_dir = PclZipUtilTranslateWinPath(getcwd(), FALSE).'/'.substr($p_dir, 1);
5512
    }
5513
    if (   ($p_path == '.')
5514
        || ((strlen($p_path) >=2) && (substr($p_path, 0, 2) == './'))) {
5515
      $p_path = PclZipUtilTranslateWinPath(getcwd(), FALSE).'/'.substr($p_path, 1);
@@ 5513-5516 (lines=4) @@
5510
        || ((strlen($p_dir) >=2) && (substr($p_dir, 0, 2) == './'))) {
5511
      $p_dir = PclZipUtilTranslateWinPath(getcwd(), FALSE).'/'.substr($p_dir, 1);
5512
    }
5513
    if (   ($p_path == '.')
5514
        || ((strlen($p_path) >=2) && (substr($p_path, 0, 2) == './'))) {
5515
      $p_path = PclZipUtilTranslateWinPath(getcwd(), FALSE).'/'.substr($p_path, 1);
5516
    }
5517
5518
    // ----- Explode dir and path by directory separator
5519
    $v_list_dir = explode("/", $p_dir);