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)
- [Portal](#portal)
- [Image viewer](#image-viewer)
- [File server](#file-server)
- [HTTP server](#http-server)
- [Torrent viewer](#torrent-viewer)
- [cprop.clj](#cpropclj)
- [fzf](#fzf)
@ -372,14 +372,15 @@ $ examples/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:
``` shell
$ examples/file-server.clj
$ examples/http-server.clj
```
See [file-server.clj](file-server.clj).

View file

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