~dricottone/my-utils

my-utils/core/dired -rw-r--r-- 760 bytes
ef6d4cd1Dominic Ricottone Incomplete work on hardware/media utils 4 days ago
                                                                                
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
#!/bin/sh

name="dired"
version="1.0"
usage_message="Usage: dired [TARGET]"
help_message=$(/usr/bin/cat <<-EOF
	Open Emacs in dired mode
	Usage: dired [TARGET]
	Options:
	 -h, --help     print this message and exit
	 -q, --quiet    suppress error messages
	 -v, --version  print version number and exit
EOF
)

. /usr/local/lib/myminiparse.sh

if [ "$#" -eq 0 ]; then
  exec emacs -nw .
elif [ "$#" -eq 1 ] && [ "$quiet" -eq 1 ]; then
  exit 1
fi

# loop through arguments
for arg; do
  case "$arg" in
  -q|--quiet)
    #ignore these
    ;;

  *)
    if [ ! -d "$arg" ]; then
      if [ "$quiet" -eq 0 ]; then
        (>&2 /usr/bin/printf "%s: No such directory '%s'\n" "$name" "$arg")
      fi
      exit 1
    fi
    exec emacs -nw "$arg"
    ;;
  esac
done