shithub: rc

Download patch

ref: fbfc783a40a11db28acaa1f178fa926e7e9eb194
parent: 56e28c1217ebec45eaa2850bbf9e98ddd44ca5de
author: qwx <qwx@sciops.net>
date: Sun Oct 2 06:15:49 EDT 2022

s: mirror ^R/^r like ^W/^w, simplify

--- a/bin/s
+++ b/bin/s
@@ -1,12 +1,8 @@
 #!/bin/rc
 # sam functions
 
-# ^D [cmd]     # run command in cwd and send output to jam.err window
-fn D{
-	if(~ $% jam.err */jam.err){
-		echo nope >[1=2]
-		exit
-	}
+# ^r [cmd]     # run command in cwd and send output to jam.err window
+fn r{
 	echo '^T'
 	c=''''^($*)^''''
 	f=$%