From 9abee809f51da26598bf24572d9b14fa13a455bd Mon Sep 17 00:00:00 2001 From: mdw Date: Fri, 30 Jul 1999 20:24:02 +0000 Subject: [PATCH] Fix titles for debugging actions. --- perl/sw.in | 9 ++++++--- 1 file changed, 6 insertions(+), 3 deletions(-) diff --git a/perl/sw.in b/perl/sw.in index 854be1f..deeba4e 100644 --- a/perl/sw.in +++ b/perl/sw.in @@ -1,7 +1,7 @@ #! @PERL@ # -*-perl-*- # -# $Id: sw.in,v 1.1 1999/07/30 18:46:38 mdw Exp $ +# $Id: sw.in,v 1.2 1999/07/30 20:24:02 mdw Exp $ # # CGI interface for software installations # @@ -29,6 +29,9 @@ #----- Revision history ----------------------------------------------------- # # $Log: sw.in,v $ +# Revision 1.2 1999/07/30 20:24:02 mdw +# Fix titles for debugging actions. +# # Revision 1.1 1999/07/30 18:46:38 mdw # New CGI script for browsing installed software and documentation. # @@ -62,8 +65,8 @@ sub debug($\%) { } $ACT{"show-config"} = sub { debug("configuration", %C); }; -$ACT{"show-environment"} = sub { debug("configuration", %ENV); }; -$ACT{"show-query"} = sub { debug("configuration", %Q); }; +$ACT{"show-environment"} = sub { debug("environment", %ENV); }; +$ACT{"show-query"} = sub { debug("query", %Q); }; #----- Snarf arguments ------------------------------------------------------ -- 2.11.0