diff options
Diffstat (limited to 'Master/tlpkg/tlperl/lib/auto/Tk/Widget/pathname.al')
-rw-r--r-- | Master/tlpkg/tlperl/lib/auto/Tk/Widget/pathname.al | 15 |
1 files changed, 0 insertions, 15 deletions
diff --git a/Master/tlpkg/tlperl/lib/auto/Tk/Widget/pathname.al b/Master/tlpkg/tlperl/lib/auto/Tk/Widget/pathname.al deleted file mode 100644 index 9b725dc26d0..00000000000 --- a/Master/tlpkg/tlperl/lib/auto/Tk/Widget/pathname.al +++ /dev/null @@ -1,15 +0,0 @@ -# NOTE: Derived from blib\lib\Tk\Widget.pm. -# Changes made here will be lost when autosplit is run again. -# See AutoSplit.pm. -package Tk::Widget; - -#line 1505 "blib\lib\Tk\Widget.pm (autosplit into blib\lib\auto\Tk\Widget\pathname.al)" -sub pathname -{ - my ($w,$id) = @_; - my $x = $w->winfo('pathname',-displayof => oct($id)); - return $x->PathName; -} - -1; -# end of Tk::Widget::pathname |