From: Joey Hess <joeyh@joeyh.name>
Date: Tue, 13 Aug 2024 18:15:43 +0000 (-0400)
Subject: avoid changing git-annex info behavior
X-Git-Tag: archive/raspbian/10.20250416-2+rpi1~1^2~21^2~129
X-Git-Url: https://dgit.raspbian.org/?a=commitdiff_plain;h=f612ebb9340a3e0ad3820fa601200d8ae2c24bc5;p=git-annex.git

avoid changing git-annex info behavior

5afbea25e7751a8841ac42db3822b81ea68f31c1 changed it to ignore journal
files that did not correspond to a key in the git-annex branch. However,
when there is a private journal, that can happen.

Neither behavior is fully correct, so keep the old incorrect behavior
rather than introducing a new differently incorrect behavior.

I plan to eventually make git-annex info use Annex.reposizes instead of
calculating it itself, and once Annex.reposizes handles this all
correctly, this will be a moot problem.
---

diff --git a/Command/Info.hs b/Command/Info.hs
index e35a646d39..2a061efdfb 100644
--- a/Command/Info.hs
+++ b/Command/Info.hs
@@ -641,7 +641,7 @@ cachedAllRepoData = do
 		Just _ -> return s
 		Nothing -> do
 			matcher <- lift getKeyOnlyMatcher
-			r <- lift $ overLocationLogs True (emptyKeyInfo, mempty) $ \k locs (d, rd) -> do
+			r <- lift $ overLocationLogs False (emptyKeyInfo, mempty) $ \k locs (d, rd) -> do
 				ifM (matchOnKey matcher k)
 					( do
 						alivelocs <- snd