summaryrefslogtreecommitdiff
path: root/bin
diff options
context:
space:
mode:
authorArun Isaac2022-06-25 14:23:34 +0530
committerArun Isaac2022-06-25 14:23:34 +0530
commitb153b85841d779c9f5e418a9eec4d979872b450d (patch)
treeb4c2bc6e55376e09efe16863f5f17d0c7402fc80 /bin
parentdab0cba73f3dcafbb5b5234847b041f141c28069 (diff)
downloadtissue-b153b85841d779c9f5e418a9eec4d979872b450d.tar.gz
tissue-b153b85841d779c9f5e418a9eec4d979872b450d.tar.lz
tissue-b153b85841d779c9f5e418a9eec4d979872b450d.zip
bin: Deprecate `tissue edit' subcommand.
* bin/tissue (tissue-edit): Delete function. (print-usage): Unlist edit subcommand. (main): Do not call tissue-edit.
Diffstat (limited to 'bin')
-rwxr-xr-xbin/tissue22
1 files changed, 0 insertions, 22 deletions
diff --git a/bin/tissue b/bin/tissue
index e4be831..f91f600 100755
--- a/bin/tissue
+++ b/bin/tissue
@@ -210,26 +210,6 @@ List issues.
rcount
(issues)))))))
-(define tissue-edit
- (match-lambda*
- (("--help")
- (format #t "Usage: ~a edit ISSUE-NUMBER
-Start $EDITOR to edit issue #ISSUE-NUMBER.
-
-"
- (command-line-program)))
- ((issue-number)
- (unless (getenv "EDITOR")
- (error "Please set the EDITOR environment variable to your favorite editor. For example,
-export EDITOR=emacsclient"))
- (let ((issue-file (issue-file (list-ref (issues)
- (1- (string->number issue-number))))))
- ;; Files may be renamed or deleted, but not
- ;; committed. Therefore, only read the file if it exists.
- (if (file-exists? issue-file)
- (invoke (getenv "EDITOR") issue-file)
- (raise (issue-file-not-found-error issue-file)))))))
-
(define tissue-show
(match-lambda*
(("--help")
@@ -338,7 +318,6 @@ Export the repository as a website to OUTPUT-DIRECTORY.
COMMAND must be one of the sub-commands listed below:
list list issues
- edit edit an issue
show show the text of an issue
repl run a Guile script in a tissue environment
web export repository as website
@@ -367,7 +346,6 @@ To get usage information for one of these sub-commands, run
(%aliases (tissue-configuration-aliases (load-config))))
(apply (match command
("list" tissue-list)
- ("edit" tissue-edit)
("show" tissue-show)
("repl" tissue-repl)
("web" tissue-web)