Removed legacy scripts. - sam - An updated version of the sam text editor. | |
git clone git://vernunftzentrum.de/sam.git | |
Log | |
Files | |
Refs | |
LICENSE | |
--- | |
commit 39fa508a3b3d2743a06d2dc224120aae208ac992 | |
parent 4caf3c9f7c95a696dcfabedc7d4cb873a17b1949 | |
Author: Rob King <[email protected]> | |
Date: Fri, 2 Sep 2016 10:22:02 -0500 | |
Removed legacy scripts. | |
Diffstat: | |
sam/B.rc | 51 ------------------------------- | |
sam/B.sh | 56 ------------------------------- | |
2 files changed, 0 insertions(+), 107 deletions(-) | |
--- | |
diff --git a/sam/B.rc b/sam/B.rc | |
@@ -1,51 +0,0 @@ | |
-#!/bin/rc | |
- | |
-files=() | |
-line='' | |
- | |
-if (~ $#* 0) { | |
- echo 'usage: B [-nnn] files...' >[1=2] | |
- exit 1 | |
-} | |
- | |
-dir=`{/bin/pwd} | |
- | |
-if (~ $#USER 0) | |
- USER=$LOGNAME | |
-pipe=/tmp/.sam.$USER | |
- | |
-switch($DISPLAY) { | |
- case *:[0-9]*.[0-9]* | |
- pipe=$pipe.$DISPLAY | |
- if (! test -r $pipe) | |
- pipe=`{echo $pipe | sed 's/\.[0-9]*$//'} | |
- case *:[0-9]* | |
- pipe=$pipe.$DISPLAY | |
- if (! test -r $pipe) | |
- pipe=$pipe.0 | |
- case "" | |
- case * | |
- pipe=$pipe.$DISPLAY | |
-} | |
- | |
-if (! test -r $pipe) { | |
- echo `{basename $0}^': No pipe "'$pipe'" to sam.' >[1=2] | |
- exit 1 | |
-} | |
- | |
-for (i) { | |
- switch($i) { | |
- case /* | |
- files = ( $files $i ) | |
- case -* | |
- line = `{echo $i | sed 's/.//'} | |
- case * | |
- files = ( $files $dir/$i ) | |
- } | |
-} | |
- | |
-if (! ~ $#files 0) | |
- echo B $files >> $pipe | |
- | |
-if (! ~ $line '') | |
- echo $line >> $pipe | |
diff --git a/sam/B.sh b/sam/B.sh | |
@@ -1,56 +0,0 @@ | |
-#!/bin/sh | |
- | |
-files= | |
-line="none" | |
- | |
-if [ $# = 0 ]; then | |
- echo 'usage: B [-nnnn] files...' 1>&2 | |
- exit 1 | |
-fi | |
- | |
-dir=`/bin/pwd` | |
-if [ "$USER" = "" ]; then | |
- USER=$LOGNAME | |
-fi | |
-pipe=/tmp/.sam.$USER | |
- | |
-case "$DISPLAY" in | |
- *:[0-9]*\.[0-9]*) | |
- pipe=$pipe.$DISPLAY | |
- if [ ! -r $pipe ]; then | |
- pipe=`echo $pipe | sed 's/\.[0-9]*$//'` | |
- fi | |
- ;; | |
- *:[0-9]*) | |
- pipe=$pipe.$DISPLAY | |
- if [ ! -r $pipe ]; then | |
- pipe=$pipe.0 | |
- fi | |
- ;; | |
- "") | |
- ;; | |
- *) pipe=$pipe.$DISPLAY | |
- ;; | |
-esac | |
-if [ ! -r $pipe ]; then | |
- echo `basename $0`": No pipe \""$pipe"\" to sam." 1>&2 | |
- exit 1 | |
-fi | |
- | |
-for i in $* | |
-do | |
- case "$i" in | |
- /*) files="$files $i" | |
- ;; | |
- -*) line=`echo $i | sed 's/.//'` | |
- ;; | |
- *) files="$files $dir/$i" | |
- ;; | |
- esac | |
-done | |
- | |
-echo "B $files" >> $pipe | |
-if [ $line != "none" ]; then | |
- echo $line >> $pipe | |
-fi | |
- |