From af563b6614fd4d6f2bf1bdd6f88b3b2c3a2ac732 Mon Sep 17 00:00:00 2001 From: John Darrington Date: Sun, 17 Mar 2013 14:03:41 +0100 Subject: [PATCH] Added the SHOW WORKSPACE command which was absent. Reported-by: Stefan Tzeggai --- src/language/utilities/set.q | 7 +++++++ 1 file changed, 7 insertions(+) diff --git a/src/language/utilities/set.q b/src/language/utilities/set.q index e6e816a8b7..8f59156e2b 100644 --- a/src/language/utilities/set.q +++ b/src/language/utilities/set.q @@ -872,6 +872,12 @@ show_width (const struct dataset *ds UNUSED) return xasprintf ("%d", settings_get_viewwidth ()); } +static char * +show_workspace (const struct dataset *ds UNUSED) +{ + return xasprintf ("%d", settings_get_workspace ()); +} + static char * show_current_directory (const struct dataset *ds UNUSED) { @@ -963,6 +969,7 @@ const struct show_sbc show_table[] = {"WIB", show_wib}, {"WRB", show_wrb}, {"WIDTH", show_width}, + {"WORKSPACE", show_workspace}, }; static void -- 2.30.2