program cannot start without /dev/tty
#! /usr/bin/perl
# infocon - Admin-Tool for InfoCon
#! /usr/bin/perl
# infocon - Admin-Tool for InfoCon
-# Copyright (c) 1998-2003,2005-7 Martin Schulze <joey@infodrom.org>
+# Copyright (c) 1998-2003,2005-8 Martin Schulze <joey@infodrom.org>
#
# This program is free software; you can redistribute it and/or modify
# it under the terms of the GNU General Public License as published by
#
# This program is free software; you can redistribute it and/or modify
# it under the terms of the GNU General Public License as published by
@categories = get_categories unless @categories;
my @descriptions = get_descriptions;
@categories = get_categories unless @categories;
my @descriptions = get_descriptions;
+ $term = new Term::ReadLine '' unless $term;
+
$term->addhistory($_) foreach (@categories);
$term->addhistory($_) foreach (@descriptions);
$term->addhistory($_) foreach (@categories);
$term->addhistory($_) foreach (@descriptions);
-$term = new Term::ReadLine '';
$i = 0;
$opt_all = 0;
$opt_verbose = 0;
$i = 0;
$opt_all = 0;
$opt_verbose = 0;