Code Duplication    Length = 7-7 lines in 2 locations

class/pcltar.lib.php 2 locations

@@ 1273-1279 (lines=7) @@
1270
            }
1271
1272
            // ----- Call the adding fct inside the tar
1273
            if (1 == ($v_result = PclTarHandleAddList($v_temp_tar, $p_list, $p_mode, $p_list_detail, $p_add_dir, $p_remove_dir))) {
1274
                // ----- Call the footer of the tar archive
1275
                $v_result = PclTarHandleFooter($v_temp_tar, $p_mode);
1276
            }
1277
1278
            // ----- Close the files
1279
            gzclose($p_tar);
1280
            gzclose($v_temp_tar);
1281
1282
            // ----- Unlink tar file
@@ 1323-1329 (lines=7) @@
1320
                TrFctMessage(__FILE__, __LINE__, 4, 'Position after :' . ('tar' === $p_mode ? ftell($p_tar) : gztell($p_tar)));
1321
1322
                // ----- Call the adding fct inside the tar
1323
                if (1 == ($v_result = PclTarHandleAddList($p_tar, $p_list, $p_mode, $p_list_detail, $p_add_dir, $p_remove_dir))) {
1324
                    // ----- Call the footer of the tar archive
1325
                    $v_result = PclTarHandleFooter($p_tar, $p_mode);
1326
                }
1327
1328
                // ----- Close the tarfile
1329
                fclose($p_tar);
1330
            } // ----- Look for unknown type
1331
            else {
1332
                // ----- Error log