example [skip ci]

This commit is contained in:
Michiel Borkent 2021-06-24 13:22:34 +02:00
parent c7942badfb
commit e42603dac0
2 changed files with 6 additions and 5 deletions

View file

@ -25,7 +25,7 @@
- [Invoke vim inside a script](#invoke-vim-inside-a-script) - [Invoke vim inside a script](#invoke-vim-inside-a-script)
- [Portal](#portal) - [Portal](#portal)
- [Image viewer](#image-viewer) - [Image viewer](#image-viewer)
- [File server](#file-server) - [HTTP server](#http-server)
- [Torrent viewer](#torrent-viewer) - [Torrent viewer](#torrent-viewer)
- [cprop.clj](#cpropclj) - [cprop.clj](#cpropclj)
- [fzf](#fzf) - [fzf](#fzf)
@ -372,14 +372,15 @@ $ examples/image-viewer.clj
See [image-viewer.clj](image-viewer.clj). See [image-viewer.clj](image-viewer.clj).
## File server ## HTTP Server
Opens browser window and lets user navigate through filesystem. Opens browser window and lets user navigate through filesystem, similar to
`python3 -m http.server`.
Example usage: Example usage:
``` shell ``` shell
$ examples/file-server.clj $ examples/http-server.clj
``` ```
See [file-server.clj](file-server.clj). See [file-server.clj](file-server.clj).

View file

@ -3,7 +3,7 @@
;; Source: https://gist.github.com/holyjak/36c6284c047ffb7573e8a34399de27d8 ;; Source: https://gist.github.com/holyjak/36c6284c047ffb7573e8a34399de27d8
;; Based on https://github.com/babashka/babashka/blob/master/examples/image_viewer.clj ;; Based on https://github.com/babashka/babashka/blob/master/examples/image_viewer.clj
(ns file-server (ns http-server
(:require [babashka.fs :as fs] (:require [babashka.fs :as fs]
[clojure.java.browse :as browse] [clojure.java.browse :as browse]
[clojure.string :as str] [clojure.string :as str]