浏览代码

Add lspaths to list only paths to clips

Alois Mahdal 10 年前
父节点
当前提交
21862da97d
共有 1 个文件被更改,包括 11 次插入2 次删除
  1. 11
    2
      libexec/saturnin-clip

+ 11
- 2
libexec/saturnin-clip 查看文件

@@ -69,6 +69,13 @@ lsclips() {
69 69
         done
70 70
 }
71 71
 
72
+lspaths() {
73
+    #
74
+    # List only clip paths
75
+    #
76
+    ls "$STORAGE_DIR/"*.clip
77
+}
78
+
72 79
 load_clip() {
73 80
     #
74 81
     # Load single clip of choice
@@ -99,11 +106,12 @@ rm_all() {
99 106
 
100 107
 
101 108
 clipname=primary
102
-action=list
109
+action=list_nice
103 110
 while true; do case "$1" in
104 111
     save)   action=save;        shift ;;
105 112
     load)   action=load;        shift ;;
106 113
     ls)     action=list;        shift ;;
114
+    lsh)    action=list_nice    shift ;;
107 115
     rm)     action=remove;      shift ;;
108 116
     clean)  action=clean;       shift ;;
109 117
     -1)     clipname=primary;   shift ;;
@@ -121,5 +129,6 @@ case $action in
121 129
     load)   load_clip $clipname ;;
122 130
     remove) rm_clip ;;
123 131
     clean)  rm_all ;;
124
-    list)   lsclips ;;
132
+    list)   lspaths ;;
133
+    list_nice)  lsclips ;;
125 134
 esac