git-annex/Upgrade/V4.hs

{- git-annex v4 -> v5 uppgrade support
 -
 - Copyright 2013 Joey Hess <id@joeyh.name>
 -
 - Licensed under the GNU AGPL version 3 or higher.
 -}

module Upgrade.V4 where

import Annex.Common

{- Was only used for direct mode upgrade. v4 to v5 indirect update is a no-op,
 - and direct mode is no longer supported, so nothing needs to be done. -}
upgrade :: Bool -> Annex Bool
upgrade _automatic = return True
v5 for direct mode, with automatic upgrade This includes storing the current state of the HEAD ref, which git annex sync is going to need, but does not make sync use it. 2013-11-05 20:42:59 +00:00			`{- git-annex v4 -> v5 uppgrade support`
			`-`
update my email address and homepage url 2015-01-21 16:50:09 +00:00			`- Copyright 2013 Joey Hess <id@joeyh.name>`
v5 for direct mode, with automatic upgrade This includes storing the current state of the HEAD ref, which git annex sync is going to need, but does not make sync use it. 2013-11-05 20:42:59 +00:00			`-`
update licenses from GPL to AGPL This does not change the overall license of the git-annex program, which was already AGPL due to a number of sources files being AGPL already. Legally speaking, I'm adding a new license under which these files are now available; I already released their current contents under the GPL license. Now they're dual licensed GPL and AGPL. However, I intend for all my future changes to these files to only be released under the AGPL license, and I won't be tracking the dual licensing status, so I'm simply changing the license statement to say it's AGPL. (In some cases, others wrote parts of the code of a file and released it under the GPL; but in all cases I have contributed a significant portion of the code in each file and it's that code that is getting the AGPL license; the GPL license of other contributors allows combining with AGPL code.) 2019-03-13 19:48:14 +00:00			`- Licensed under the GNU AGPL version 3 or higher.`
v5 for direct mode, with automatic upgrade This includes storing the current state of the HEAD ref, which git annex sync is going to need, but does not make sync use it. 2013-11-05 20:42:59 +00:00			`-}`

			`module Upgrade.V4 where`

remove 163 lines of code without changing anything except imports 2016-01-20 20:36:33 +00:00			`import Annex.Common`
v5 for direct mode, with automatic upgrade This includes storing the current state of the HEAD ref, which git annex sync is going to need, but does not make sync use it. 2013-11-05 20:42:59 +00:00
remove most remnants of direct mode A few remain, as needed for upgrades, and for accessing objects from remotes that are direct mode repos that have not been converted yet. 2019-08-26 19:52:19 +00:00			`{- Was only used for direct mode upgrade. v4 to v5 indirect update is a no-op,`
			`- and direct mode is no longer supported, so nothing needs to be done. -}`
v5 for direct mode, with automatic upgrade This includes storing the current state of the HEAD ref, which git annex sync is going to need, but does not make sync use it. 2013-11-05 20:42:59 +00:00			`upgrade :: Bool -> Annex Bool`
remove most remnants of direct mode A few remain, as needed for upgrades, and for accessing objects from remotes that are direct mode repos that have not been converted yet. 2019-08-26 19:52:19 +00:00			`upgrade _automatic = return True`