Restore compatibility with newer version of base16-bytestring.

Taken from https://raw.githubusercontent.com/archlinux/svntogit-community/packages/trunk/cabal-install-base16-bytestring1.0.patch

diff --git a/Distribution/Client/HashValue.hs b/Distribution/Client/HashValue.hs
index 54b8aee9e..11e647c1c 100644
--- a/Distribution/Client/HashValue.hs
+++ b/Distribution/Client/HashValue.hs
@@ -1,3 +1,4 @@
+{-# LANGUAGE CPP          #-}
 {-# LANGUAGE DeriveDataTypeable #-}
 {-# LANGUAGE DeriveGeneric      #-}
 module Distribution.Client.HashValue (
@@ -72,10 +73,14 @@ hashFromTUF (Sec.Hash hashstr) =
     --TODO: [code cleanup] either we should get TUF to use raw bytestrings or
     -- perhaps we should also just use a base16 string as the internal rep.
     case Base16.decode (BS.pack hashstr) of
+#if MIN_VERSION_base16_bytestring(1,0,0)
+      Right hash -> HashValue hash
+      Left _ -> error "hashFromTUF: cannot decode base16"
+#else
       (hash, trailing) | not (BS.null hash) && BS.null trailing
         -> HashValue hash
       _ -> error "hashFromTUF: cannot decode base16 hash"
-
+#endif
 
 -- | Truncate a 32 byte SHA256 hash to
 --
ix/log/tests/composer.scm'>log</a><a href='/guix/tree/tests/composer.scm?id=0bca6c03098fba7f98b7050badd52f783b3dff0c'>tree</a><a href='/guix/commit/tests/composer.scm?id=0bca6c03098fba7f98b7050badd52f783b3dff0c'>commit</a><a href='/guix/diff/tests/composer.scm?id=0bca6c03098fba7f98b7050badd52f783b3dff0c'>diff</a></td><td class='form'><form class='right' method='get' action='/guix/log/tests/composer.scm'>
<input type='hidden' name='id' value='0bca6c03098fba7f98b7050badd52f783b3dff0c'/><select name='qt'>
<option value='grep'>log msg</option>
<option value='author'>author</option>
<option value='committer'>committer</option>
<option value='range'>range</option>
</select>
<input class='txt' type='search' size='10' name='q' value=''/>
<input type='submit' value='search'/>
</form>
</td></tr></table>
<div class='path'>path: <a href='/guix/log/?id=0bca6c03098fba7f98b7050badd52f783b3dff0c'>root</a>/<a href='/guix/log/tests?id=0bca6c03098fba7f98b7050badd52f783b3dff0c'>tests</a>/<a href='/guix/log/tests/composer.scm?id=0bca6c03098fba7f98b7050badd52f783b3dff0c'>composer.scm</a></div><div class='content'><table class='list nowrap'><tr class='nohover'><th class='left'>Age</th><th class='left'>Commit message (<a href='/guix/log/tests/composer.scm?id=0bca6c03098fba7f98b7050badd52f783b3dff0c&amp;showmsg=1'>Expand</a>)</th><th class='left'>Author</th></tr>
<tr><td><span title='2023-12-18 23:16:28 +0100'>2023-12-18</span></td><td><a href='/guix/commit/tests/composer.scm?id=b7e3945283daec8d6bc676b659d00ed73b8e82b7'>guix: import: Add composer importer.</a><span class='msg-avail'>...<span class='msg-tooltip'>* guix/import/composer.scm: New file.
* guix/scripts/import/composer.scm: New file.
* guix/tests/composer.scm: New file.
* Makefile.am: Add them.
* guix/scripts/import.scm: Add composer importer.
* doc/guix.texi (Invoking guix import): Mention it.

Change-Id: I44a89b8cc80ef5b4a3cd15e8fbba4a18c1cea0b1

Co-authored-by: Julien Lepiller &lt;julien@lepiller.eu&gt;
Co-authored-by: Ludovic Courtès &lt;ludo@gnu.org&gt;
</span></span></td><td>Nicolas Graves</td></tr>