From 7e1e47efe1903c3b3154fb203af80fa03c10d08f Mon Sep 17 00:00:00 2001
From: Sebastiano Tronto <sebastiano@tronto.net>
Date: Mon, 21 Feb 2022 12:28:53 +0100
Subject: Do not clear selection or remove files if copy was unsuccessful

---
 sel | 12 +++++-------
 1 file changed, 5 insertions(+), 7 deletions(-)

(limited to 'sel')

diff --git a/sel b/sel
index b83bbe1..6fee2c6 100755
--- a/sel
+++ b/sel
@@ -61,12 +61,14 @@ cphere() {
 	if [ "$(wc -l $file  | awk '{print $1}')" != \
 	     "$(wc -l $file2 | awk '{print $1}')" ]; then
 		echo "Error reading new file names"
+		return 1
 	else
 		paste "$file" "$file2" | while read f; do
 			fold=$(echo "$f" | sed 's/\t.*//')
 			fnew=$(echo "$f" | sed 's/.*\t//')
 			cp -R "$fold" ./"$fnew"
 		done
+		return 0
 	fi
 }
 
@@ -94,23 +96,19 @@ case "$1" in
 		clear
 		;;
 	cp)
-		cphere
-		clear
+		cphere && clear
 		;;
 	edit)
 		$editor "$file"
 		;;
 	mv)
-		cphere
-		remove
-		clear
+		cphere && (remove; clear)
 		;;
 	open)
 		open
 		;;
 	rm)
-		remove
-		clear
+		remove && clear
 		;;
 	*)
 		echo "$1: not a valid sel command"
-- 
cgit v1.3