suimeng
/
helix
mirror of https://github.com/helix-editor/helix
1
0
Fork 0
Code Issues Packages Projects Releases Wiki Activity

update STEEL.md

pull/8675/merge^2
mattwparas 2024-10-30 16:43:38 -07:00
parent 7d4f9183e6
commit 30824f6bd2
1 changed files with 2 additions and 9 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

11
STEEL.md
View File

@ -55,17 +55,10 @@ to be used as typed commands. For example:
(define (git-add cx) (define (git-add cx)
(shell cx "git" "add" "%")) (shell cx "git" "add" "%"))
;; Functions to assist with the above
(define (editor-get-doc-if-exists doc-id)
(if (editor-doc-exists? doc-id) (editor->get-document doc-id) #f))
(define (current-path) (define (current-path)
(let* ([focus (editor-focus)] (let* ([focus (editor-focus)]
[focus-doc-id (editor->doc-id focus)] [focus-doc-id (editor->doc-id focus)])
[document (editor-get-doc-if-exists focus-doc-id)]) (editor-document->path focus-doc-id)))
(if document (Document-path document) #f)))
;;@doc ;;@doc
;; Open the helix.scm file ;; Open the helix.scm file