diff options
| author | Hugo Hörnquist <hugo@lysator.liu.se> | 2022-03-14 01:08:01 +0100 |
|---|---|---|
| committer | Hugo Hörnquist <hugo@lysator.liu.se> | 2022-03-15 01:43:12 +0100 |
| commit | 6e656649817cd674b324af47a3d83a2b3a46a501 (patch) | |
| tree | 45f26c81ec352b3e7aae66d4229ffcc9dec3bf2a /module | |
| parent | Fix anchors in non-js page. (diff) | |
| download | calp-6e656649817cd674b324af47a3d83a2b3a46a501.tar.gz calp-6e656649817cd674b324af47a3d83a2b3a46a501.tar.xz | |
Directory table extra filetypes.
Diffstat (limited to 'module')
| -rw-r--r-- | module/calp/server/routes.scm | 5 |
1 files changed, 5 insertions, 0 deletions
diff --git a/module/calp/server/routes.scm b/module/calp/server/routes.scm index 843eb01c..06bbe193 100644 --- a/module/calp/server/routes.scm +++ b/module/calp/server/routes.scm @@ -57,6 +57,11 @@ `(tr (td ,(case (stat:type stat) [(directory) "📁"] [(regular) "📰"] + [(symlink) "🔗"] + [(block-special) "🖴"] + [(char-special) "🔌"] + ;; [(fifo)] + ;; [(socket)] [else "🙃"])) (td (a (@ (href "/" ,dir "/" ,k)) ,k)) (td ,(number->string (stat:perms stat) 8))))) |