chiark
/
gitweb
/
~ianmdlvl
/
nailing-cargo.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
| inline |
side by side
(parent:
2322b22
)
nailing-cargo: Provide stat_exists
author
Ian Jackson
<ijackson@chiark.greenend.org.uk>
Sun, 10 May 2020 23:19:23 +0000
(
00:19
+0100)
committer
Ian Jackson
<ijackson@chiark.greenend.org.uk>
Sun, 10 May 2020 23:19:31 +0000
(
00:19
+0100)
No caller yet.
Signed-off-by: Ian Jackson <ijackson@chiark.greenend.org.uk>
nailing-cargo
patch
|
blob
|
history
diff --git
a/nailing-cargo
b/nailing-cargo
index fa16da5da1811a3a1f86455fc899b2537e1a2208..4a8daf99ccd16f63a37967861c9d343f83ea2b67 100755
(executable)
--- a/
nailing-cargo
+++ b/
nailing-cargo
@@
-99,6
+99,13
@@
sub read_or_enoent ($) {
$r;
}
+sub stat_exists ($$) {
+ my ($fn, $what) = @_;
+ if (stat $fn) { return 1; }
+ $!==ENOENT or die "$self: stat $what: $fn: $!\n";
+ return 0;
+}
+
sub toml_or_enoent ($$) {
my ($f,$what) = @_;
my $toml = read_or_enoent($f) // return;