kun

git clone git://bebou.netlib.re/kun
Log | Files | Refs | README |

commit f5bdb3608ecf997bfd7d28290bf0ea75d6b8669d
parent 632f1ea0ec174faa65f428f3a0f16ba02b4c8bd6
Auterice: Arthur Pons <arthur.pons@unistra.fr>
Date:   Fri, 20 Sep 2024 10:26:27 +0200

Suppression de kun qui est désormais "compilé"

Diffstat:
D
kun
 | 
103
-------------------------------------------------------------------------------

1 file changed, 0 insertions(+), 103 deletions(-)
diff --git a/kun b/kun
@@ -1,103 +0,0 @@
-#! /bin/sh
-
-while getopts "h" opt;do
-	case $opt in
-		(h) help=yes;;
-	esac
-done
-
-. /usr/local/share/kun/utils.sh
-
-. /usr/local/share/kun/commands.sh
-
-[ "$help" = "yes" ] \
-	&& { echo "Les commandes dispos : \n"
-	     grep -E -B3 "^[a-zA-Z]+ *\(\) *{ *$" /usr/local/share/kun/commands | grep -v ^$
-		 exit 0;
-	   }
-
-# Probablement pas safe mais pratique
-#[ "$(type $1)" = "$1 is a shell function" ] \
-#	&& { eval "$(echo $@ | cut -d';' -f1)" && exit 0 || exit 1;}
-
-# Probablement safe mais fastidieux
-if [ -n "$1" ];then
-	case "$1" in
-		(create)         create         "$2"      && exit 0 || exit 1;;
-		(addanswer)      addanswer      "$2" "$3" && exit 0 || exit 1;;
-		(modifyanswer)   modifyanswer   "$2" "$3" && exit 0 || exit 1;;
-		(deletequestion) deletequestion "$2"      && exit 0 || exit 1;;
-		(deleteanswer)   deleteanswer   "$2" "$3" && exit 0 || exit 1;;
-		(results)        results        "$2"      && exit 0 || exit 1;;
-		(getpeople)      getpeople      "$2"      && exit 0 || exit 1;;
-		(getanswer)      getanswer      "$2" "$3" && exit 0 || exit 1;;
-		(*)              _die "Commande n'existe pas";exit 1;;
-	esac
-fi
-
-
-while [ ! "$k" = "quitter" ];do
-
-	t="";l=""
-	k=$(<<-. fzy
-	quitter
-	créer un sondage
-	répondre à un sondage
-	consulter un sondage
-	supprimer un sondage
-	supprimer une réponse
-	.
-	)
-
-	case $k in
-		("créer un sondage")
-			create "$id" ;;
-		("répondre à un sondage")
-			read -p "id du sondage : " id
-			_questionexists "$id" || { _die "Sondage n'existe pas"; continue; }
-			l=$(<<-. fzy
-				ajouter une réponse
-				modifier une réponse
-			.
-			)
-			case $l in
-				("ajouter une réponse") 
-					read -p "votre nom : " name
-					while ! addanswer "$id" "$name";do
-						read -p "votre nom : " name
-					done ;;
-				("modifier une réponse")
-					read -p "id de la réponse : " idrep
-					modifyanswer "$id" "$idrep" ;;
-			esac ;;
-		("consulter un sondage")
-			read -p "id du sondage : " id
-			_questionexists "$id" || { _die "Sondage n'existe pas"; continue; }
-			while [ ! "$t" = "quitter" ];do
-				t=$(<<-. fzy
-					quitter
-					toutes
-					une personne
-				.
-				)
-				case $t in
-					("toutes")
-						results "$id" ;;
-					("une personne")
-						while [ ! "$pers" = "quitter" ];do
-							pers=$(getpeople "$id" | sed '1i\quitter' | fzy)
-							[ "$pers" != "quitter" ] && getanswer "$id" "$pers"
-						done;pers="";;
-				esac
-			done ;;
-		("supprimer un sondage")
-			read -p "id du sondage : " id
-			deletequestion "$id" ;;
-		("supprimer une réponse")
-			read -p "id du sondage : " id
-			read -p "id de la réponse : " idrep
-			deleteanswer "$id" "$idrep";;
-	esac
-
-done
-