From: Ian Jackson <ijackson@chiark.greenend.org.uk>
Date: Sun, 26 Jul 2015 20:35:15 +0000 (+0100)
Subject: Provide access_cfg_bool (no call sites yet)
X-Git-Tag: debian/1.1~28
X-Git-Url: https://www.chiark.greenend.org.uk/ucgi/~ianmdlvl/git?p=dgit.git;a=commitdiff_plain;h=b1772b364e75b32c413db7060a0adf8b124c84db

Provide access_cfg_bool (no call sites yet)
---

diff --git a/dgit b/dgit
index a0f560ae..ae96531e 100755
--- a/dgit
+++ b/dgit
@@ -694,6 +694,11 @@ sub access_cfg (@) {
     return $value;
 }
 
+sub access_cfg_bool ($$) {
+    my ($def, @keys) = @_;
+    parse_cfg_bool($keys[0], $def, access_cfg(@keys, 'RETURN-UNDEF'));
+}
+
 sub string_to_ssh ($) {
     my ($spec) = @_;
     if ($spec =~ m/\s/) {