Replace magic constants for seek() calls in perl scripts
authorMichael Paquier <michael@paquier.xyz>
Mon, 19 Apr 2021 01:15:35 +0000 (10:15 +0900)
committerMichael Paquier <michael@paquier.xyz>
Mon, 19 Apr 2021 01:15:35 +0000 (10:15 +0900)
commitc731f9187b5fd7038b04ba60703d3cace1806366
tree7dcd3ff267a896c68434daee719153c6d32b8353
parent8e861eaae86eeaf5589963c9b1c7ce6d4c2acbb5
Replace magic constants for seek() calls in perl scripts

A couple of tests have been using 0 as magic constant while SEEK_SET can
be used instead.  This makes the code easier to understand, and more
consistent with the changes done in 3c5b068.

Per discussion with Andrew Dunstan.

Discussion: https://postgr.es/m/YHrc24AgJQ6tQ1q0@paquier.xyz
contrib/amcheck/t/001_verify_heapam.pl
src/bin/pg_amcheck/t/003_check.pl
src/bin/pg_amcheck/t/004_verify_heapam.pl
src/bin/pg_basebackup/t/010_pg_basebackup.pl
src/bin/pg_checksums/t/002_actions.pl