minor fixes and improvements

[distro-setup] / clip-hc

diff --git a/clip-hc b/clip-hc
deleted file mode 100755 (executable)
index 9f9ccf4..0000000
--- a/clip-hc
+++ /dev/null
@@ -1,40 +0,0 @@
-#!/bin/bash
-# I, Ian Kelling, follow the GNU license recommendations at
-# https://www.gnu.org/licenses/license-recommendations.en.html. They
-# recommend that small programs, < 300 lines, be licensed under the
-# Apache License 2.0. This file contains or is part of one or more small
-# programs. If a small program grows beyond 300 lines, I plan to switch
-# its license to GPL.
-
-# Copyright 2024 Ian Kelling
-
-# Licensed under the Apache License, Version 2.0 (the "License");
-# you may not use this file except in compliance with the License.
-# You may obtain a copy of the License at
-
-#     http://www.apache.org/licenses/LICENSE-2.0
-
-# Unless required by applicable law or agreed to in writing, software
-# distributed under the License is distributed on an "AS IS" BASIS,
-# WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
-# See the License for the specific language governing permissions and
-# limitations under the License.
-
-set -e; . /usr/local/lib/bash-bear; set +e
-
-cd /a/bin/data/clips/hc
-
-if pgrep mpv; then
-  pkill mpv
-  exit 0
-fi
-
-clip=$(find . -type f -printf '%f\n' | \
-         { if [[ -e /tmp/last-hc ]]; then
-             sed "/^$(cat /tmp/last-hc)\$/d"
-           else
-             cat
-           fi ; } | \
-             shuf | head -n1)
-echo $clip >/tmp/last-hc
-mpv --profile=a $clip