summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorGravatar Joey Hess <joeyh@joeyh.name>2016-03-11 19:55:27 -0400
committerGravatar Joey Hess <joeyh@joeyh.name>2016-03-11 19:55:27 -0400
commitc98d5d43e4e88533b0f97a3e64027f2cb5767864 (patch)
treed3bd3c26d073407e023290d726a7fb1c6d67d7e5
parent42ef47f99c1acda30d16c3c6cc6317945929a2da (diff)
devblog
-rw-r--r--doc/devblog/day_372__adjusted_branches_improved.mdwn18
1 files changed, 18 insertions, 0 deletions
diff --git a/doc/devblog/day_372__adjusted_branches_improved.mdwn b/doc/devblog/day_372__adjusted_branches_improved.mdwn
new file mode 100644
index 000000000..ce91693f4
--- /dev/null
+++ b/doc/devblog/day_372__adjusted_branches_improved.mdwn
@@ -0,0 +1,18 @@
+After a real brain-bender of a day, I have commit propigation from the
+adjusted branch back to the original branch working, without needing to
+reverse adjust the whole tree. This is faster, but the really nice thing
+is that it makes individual adjustments simpler to write.
+
+In fact, it's so simple that I took 10 minutes just now to implement a second
+adjustment!
+
+[[!format haskell """
+adjustTreeItem HideMissingAdjustment h ti@(TreeItem _ _ s) = do
+ mk <- catKey s
+ case mk of
+ Just k -> ifM (inAnnex k)
+ ( return (Just ti)
+ , return Nothing
+ )
+ Nothing -> return (Just ti)
+"""]]