Changeset 15409 for misc/runpugs/bin
- Timestamp:
- 03/02/07 17:37:07 (21 months ago)
- Location:
- misc/runpugs/bin
- Files:
-
- 2 modified
-
multi_client_model.pl (modified) (2 diffs)
-
termserv4.pl (modified) (1 diff)
Legend:
- Unmodified
- Added
- Removed
-
misc/runpugs/bin/multi_client_model.pl
r15408 r15409 10 10 use lib '../lib/'; 11 11 use Web::Terminal::Settings; 12 use Web::Terminal::Dispatcher 3;13 #$Web::Terminal::Settings::port=2058;12 use Web::Terminal::Dispatcher; 13 $Web::Terminal::Settings::port=2059; 14 14 my $v=0; 15 15 my $hist=0; # don't display command history … … 131 131 132 132 (my $reply,my $prompt,my $histref) = 133 &Web::Terminal::Dispatcher 3::send($id,$ip,$app,1,$cmd);133 &Web::Terminal::Dispatcher::send($id,$ip,$app,1,$cmd); 134 134 if($Web::Terminal::Settings::test) { 135 135 $reply=~s/^.*?called\ with\ //; -
misc/runpugs/bin/termserv4.pl
r15408 r15409 10 10 11 11 use lib '../lib/'; 12 use Web::Terminal::Server 4;12 use Web::Terminal::Server; 13 13 use Web::Terminal::Settings; 14 #$Web::Terminal::Settings::port=2058;14 $Web::Terminal::Settings::port=2059; 15 15 $ENV{PUGS_SAFEMODE}=1; 16 16 my $v=1-$Web::Terminal::Settings::daemon; 17 17 print "Starting server\n" if $v; 18 &Web::Terminal::Server 4::run();18 &Web::Terminal::Server::run(); 19 19
