projects
/
p5sagit/p5-mst-13.2.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
SCO 3.2v5 patch for perl5.005_03-MAINT_TRIAL_1
[p5sagit/p5-mst-13.2.git]
/
lib
/
complete.pl
diff --git
a/lib/complete.pl
b/lib/complete.pl
index
3352452
..
539f2f7
100644
(file)
--- a/
lib/complete.pl
+++ b/
lib/complete.pl
@@
-75,7
+75,8
@@
sub Complete {
# (^U) kill
$_ eq $kill && do {
if ($r) {
- undef($r, $return);
+ undef $r;
+ undef $return;
print("\r\n");
redo LOOP;
}