diff options
Diffstat (limited to '.local/bin/emacs-update-packages')
| -rwxr-xr-x | .local/bin/emacs-update-packages | 32 |
1 files changed, 20 insertions, 12 deletions
diff --git a/.local/bin/emacs-update-packages b/.local/bin/emacs-update-packages index 2f162a5..ecf5267 100755 --- a/.local/bin/emacs-update-packages +++ b/.local/bin/emacs-update-packages @@ -8,7 +8,15 @@ set -euo pipefail test "${DEBUG:-}" && set -x -BKPDIR=.elpa.$(date +%F-%T) +cd ~/.config/emacs + +test -L elpa || { + echo >&2 "'elpa' directory must be a symlink." + exit 1 +} + +OLDELPADIR=$(readlink elpa) +NEWELPADIR=.elpa.$(date +%F-%T) read-packages () { @@ -57,8 +65,8 @@ compare-packages () # Make a patch for later review. ( set +e - diff > ${BKPDIR}/update-${pkg}.patch \ - -ru ${BKPDIR}/${pkg}-${oldv} elpa/${pkg}-${newv} + diff > ${NEWELPADIR}/update-${pkg}.patch \ + -ru ${OLDELPADIR}/${pkg}-${oldv} ${NEWELPADIR}/${pkg}-${newv} diffstatus=$? @@ -73,15 +81,15 @@ compare-packages () done } -( - cd ~/.config/emacs - cp -a elpa ${BKPDIR} +cp -a ${OLDELPADIR} ${NEWELPADIR} + +declare -A OLDPACKAGES NEWPACKAGES - declare -A OLDPACKAGES NEWPACKAGES +read-packages OLDPACKAGES +ln -fsT ${NEWELPADIR} elpa - read-packages OLDPACKAGES - emacs -f package-upgrade-all -f package-autoremove - read-packages NEWPACKAGES +emacs -f package-upgrade-all -f package-autoremove +read-packages NEWPACKAGES - enum-packages | compare-packages | column -ts$'\t' -) +enum-packages | compare-packages | column -ts$'\t' | + tee ${NEWELPADIR}/update.sum |