From 01f1d4889a4e4b97a69a0b547bb153922a4a5e99 Mon Sep 17 00:00:00 2001
From: Lars Brinkhoff <lars@nocrew.org>
Date: Mon, 26 Nov 2018 12:12:10 +0100
Subject: [PATCH] LSRDMP - dump user database.

---
 build/lisp.tcl  | 3 +++
 doc/programs.md | 1 +
 2 files changed, 4 insertions(+)

diff --git a/build/lisp.tcl b/build/lisp.tcl
index 0b8d9961..a4409077 100644
--- a/build/lisp.tcl
+++ b/build/lisp.tcl
@@ -244,6 +244,9 @@ respond "*" ":link sys1;ts lookup,inquir;ts lookup\r"
 respond "*" ":midas sys3;ts lsrprt_sysen1; lsrprt\r"
 expect ":KILL"
 
+respond "*" ":midas sys3;ts lsrdmp_bawden; lsrdmp\r"
+expect ":KILL"
+
 respond "*" ":print cstacy;..new. (udir)\r"
 type ":vk\r"
 
diff --git a/doc/programs.md b/doc/programs.md
index 7f0c9a6a..5261a20b 100644
--- a/doc/programs.md
+++ b/doc/programs.md
@@ -159,6 +159,7 @@
 - LOSS (device).
 - LOTCLN - LOGOUT TIMES cleanup program.
 - LSPEED, set TTY line parameters.
+- LSRDMP, dump the user database.
 - LSRPRT, print information about user groups.
 - LUSER, request help from registered list of logged-in users.
 - MACN80, Z80 cross assembler.