Nautilus scripts for git-annex

0README.md

Nautilus scripts for git-annex

DEPRECATED: git-annex has built-in functionality for this now.

Save git-annex get into ~/.local/share/nautilus/scripts/, chmod 755 'git-annex get', ln -s 'git-annex get' 'git-annex drop'.

git-annex get

#!/bin/sh
set -eu

shellquote() {
  local space
  space=''
  for arg; do
    printf '%s' "$space"
    printf '%s' "$arg" | sed -e "s/'/'\\\\''/g; s/^/'/; s/\$/'/;"
    space=' '
  done
  printf '\n'
}

# wow   such metaprogramming
end_success="printf '\\nExiting.\\n'; sleep 2;"
end_failure="printf '\\nHit Return to exit. '; read dummy;"

go() {
  local verb
  verb="$1"; shift

  exec gnome-terminal -x sh -euc "
    if $(shellquote git annex "$verb" -- "$@"); then
      $end_success
    else
      $end_failure
    fi;
  "
}

case "$0" in
  *[Gg]et)  go get  "$@" ;;
  *[Dd]rop) go drop "$@" ;;
  *)
    gnome-terminal -x sh -euc "
      $(shellquote printf 'Error: "%s" does not end with Get/Drop.\n' "$0");
      $end_failure
    "
    exit 1
    ;;
esac