| 1 |
joko |
1.1 |
## ------------------------------------------------------------------------- |
| 2 |
|
|
## $Id: shortcuts.pm,v 1.11 2003/06/23 17:41:50 jonen Exp $ |
| 3 |
|
|
## ------------------------------------------------------------------------- |
| 4 |
|
|
## $Log: shortcuts.pm,v $ |
| 5 |
|
|
## ------------------------------------------------------------------------- |
| 6 |
|
|
|
| 7 |
|
|
|
| 8 |
|
|
package IPC::Session::NoShell; |
| 9 |
|
|
|
| 10 |
|
|
use base qw( IPC::Session ); |
| 11 |
|
|
|
| 12 |
|
|
# This could be enhanced (e.g.) returning $IPC::Session::shell or s.th.l.th.!? |
| 13 |
|
|
sub getshell { |
| 14 |
|
|
return ''; |
| 15 |
|
|
} |
| 16 |
|
|
|
| 17 |
|
|
|
| 18 |
|
|
1; |
| 19 |
|
|
__END__ |
Parent Directory
| 
Revision Log
