From 181bed8a665b03aa1b14224ad21dcd413a7aa8c4 Mon Sep 17 00:00:00 2001
Message-Id: <181bed8a665b03aa1b14224ad21dcd413a7aa8c4.1715379983.git.mdw@distorted.org.uk>
From: Mark Wooding <mdw@chiark.greenend.org.uk>
Date: Thu, 20 Sep 2012 01:02:18 +0100
Subject: [PATCH 1/1] keys.list-recov: Remove spurious `.recov' suffix from
 listed secrets.
Organization: Straylight/Edgeware

From: Mark Wooding <mdw@distorted.org.uk>

It's not correct for users to provide it, so we shouldn't print it.
---
 keys.list-recov | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/keys.list-recov b/keys.list-recov
index 24978aa..e05dc33 100755
--- a/keys.list-recov
+++ b/keys.list-recov
@@ -87,7 +87,7 @@ else
       ## instance.
       anyp=nil
       for sf in $(cd $ri; find . -type f -name '*.recov' -print); do
-	s=${sf#./}
+	s=${sf#./}; s=${s%.recov}
 	case $anyp in nil) anyp=t; echo "      secrets" ;; esac
 	echo "	$s"
       done
-- 
[mdw]