home *** CD-ROM | disk | FTP | other *** search
/ Australian Personal Computer 2004 July / APC0407D2.iso / workshop / apache / files / ActivePerl-5.6.1.638-MSWin32-x86.msi / _cd769d71ff0f53b0f43c9d13b7390233 < prev    next >
Encoding:
Text File  |  2004-04-13  |  283 b   |  20 lines

  1. package Tk::Pixmap;
  2.  
  3. use vars qw($VERSION);
  4. $VERSION = '3.011'; # $Id: //depot/Tk8/TixPixmap/Pixmap.pm#11 $
  5.  
  6. use Tk qw($XS_VERSION);
  7.  
  8. use Tk::Image ();
  9.  
  10. use base  qw(Tk::Image);
  11.  
  12. Construct Tk::Image 'Pixmap';
  13.  
  14. bootstrap Tk::Pixmap;
  15.  
  16. sub Tk_image { 'pixmap' }
  17.  
  18. 1;
  19.  
  20.