diff options
author | Perl 5 Porters <perl5-porters@africa.nicoh.com> | 1997-03-07 04:01:12 +1200 |
---|---|---|
committer | Chip Salzenberg <chip@atlantic.net> | 1997-03-07 04:01:12 +1200 |
commit | 2ae324a7ad5d4e616e757c311984fd86d5857ddd (patch) | |
tree | 6cf53ad504c2bded7498b6ca70d77e536d03ab7f /lib | |
parent | 651159bc74695f653cfb486793f878de6956d77c (diff) | |
download | perl-2ae324a7ad5d4e616e757c311984fd86d5857ddd.tar.gz |
[inseparable changes from match from perl-5.003_92 to perl-5.003_93]
BUILD PROCESS
Subject: Fix for Unisys UNIX and libperl.so
Date: Thu, 6 Mar 97 16:28 GMT0
From: Alan Burlison <aburlison@cix.compulink.co.uk>
Files: Configure
Msg-ID: memo.147328@cix.compulink.co.uk
(applied based on p5p patch as commit 2f525a329506abe067c4ec9d4c7ae13d8b223081)
Subject: Allow './Configure -Uoptimize'
Date: Thu, 06 Mar 1997 11:15:47 -0500 (EST)
From: Andy Dougherty <doughera@fractal.phys.lafayette.edu>
Files: Configure
Msg-ID: Pine.SOL.3.95q.970306110532.11070A-100000@fractal.lafayette.
(applied based on p5p patch as commit 59ae47780c168857b216412f8354d10ae6dd0b61)
Subject: Use 'test -f', not 'test -x'
Date: Fri, 7 Mar 1997 19:53:00 -0500
From: Spider Boardman <spider@web.zk3.dec.com>
Files: Configure
Msg-ID: 199703080053.TAA13943@web.zk3.dec.com
(applied based on p5p patch as commit 64b4562546c4e74f87c21f65a76ec05e96a1b74f)
CORE LANGUAGE CHANGES
Subject: Don't autovivify array and hash elements in sub parameters
Date: Thu, 06 Mar 1997 14:12:09 -0500
From: Gurusamy Sarathy <gsar@engin.umich.edu>
Files: op.c pod/perldelta.pod pod/perlsub.pod pod/perltrap.pod
Msg-ID: 199703061912.OAA20606@aatma.engin.umich.edu
(applied based on p5p patch as commit 0ffc6623ceb5acc7b954e8cdbaeb8ba319474d7b)
Subject: Support READ and GETC for tied handles
Date: Sat, 08 Mar 1997 19:19:38 -0500
From: Doug MacEachern <dougm@opengroup.org>
Files: pod/perldelta.pod pod/perltie.pod pp_sys.c t/op/misc.t
Msg-ID: 199703090019.TAA32591@postman.osf.org
(applied based on p5p patch as commit b06b64f805517c26cbd7c4d2f74efd5f36b4692c)
Subject: Warn on C<@x =~ /a/> and C<%x =~ s/a/b/>
From: Chip Salzenberg <chip@perl.com>
Files: op.c pod/perldiag.pod
CORE PORTABILITY
Subject: VMS update
Date: Fri, 07 Mar 1997 22:49:46 -0500 (EST)
From: Charles Bailey <bailey@HMIVAX.HUMGEN.UPENN.EDU>
Files: lib/ExtUtils/MM_VMS.pm vms/descrip.mms vms/gen_shrfls.pl vms/sockadapt.h
private-msgid: 01IG8KN5R28M00661G@hmivax.humgen.upenn.edu
DOCUMENTATION
Subject: Consolidated INSTALL updates since _92
Date: Sat, 08 Mar 1997 13:21:22 -0500 (EST)
From: Andy Dougherty <doughera@fractal.phys.lafayette.edu>
Files:
Msg-ID: Pine.SOL.3.95q.970308131806.23766F-100000@fractal.lafayette.
(applied based on p5p patch as commit e6834c60cd85866fc530e8b4bb831af6186bad4d)
Subject: PODs corrections
Date: Fri, 7 Mar 1997 21:53:04 -0500 (EST)
From: Ilya Zakharevich <ilya@math.ohio-state.edu>
Files: ext/DB_File/DB_File.pm ext/Socket/Socket.pm lib/Class/Template.pm lib/ExtUtils/Embed.pm lib/ExtUtils/MM_VMS.pm lib/ExtUtils/Mksymlists.pm lib/File/Basename.pm lib/File/stat.pm lib/Time/gmtime.pm lib/Time/localtime.pm lib/Time/tm.pm lib/User/grent.pm lib/User/pwent.pm pod/perlcall.pod pod/perldebug.pod pod/perlfunc.pod pod/perlguts.pod pod/perllocale.pod pod/perlop.pod pod/perlsub.pod
Msg-ID: 199703080253.VAA24975@monk.mps.ohio-state.edu
(applied based on p5p patch as commit 72451f4af0d31f24ef5b12bc5d034e3e8b35d43d)
OTHER CORE CHANGES
Subject: Fix imbalanced ENTER/LEAVE from C<BEGIN{die}>
From: Chip Salzenberg <chip@perl.com>
Files: op.c perl.c proto.h
Subject: perl -P path patch
Date: Sat, 08 Mar 1997 12:45:08 -0500 (EST)
From: Andy Dougherty <doughera@fractal.phys.lafayette.edu>
Files: config_H config_h.SH perl.c plan9/config.plan9 t/comp/cpp.t vms/config.vms win32/config.H
Msg-ID: Pine.SOL.3.95q.970308120242.23766D-100000@fractal.lafayette.
(applied based on p5p patch as commit bba014945c609b5474f61f5e82ed2ff3e83a6e47)
Diffstat (limited to 'lib')
-rw-r--r-- | lib/Class/Template.pm | 4 | ||||
-rw-r--r-- | lib/ExtUtils/Embed.pm | 4 | ||||
-rw-r--r-- | lib/ExtUtils/MM_VMS.pm | 22 | ||||
-rw-r--r-- | lib/ExtUtils/Mksymlists.pm | 4 | ||||
-rw-r--r-- | lib/File/Basename.pm | 4 | ||||
-rw-r--r-- | lib/File/stat.pm | 2 | ||||
-rw-r--r-- | lib/Time/gmtime.pm | 2 | ||||
-rw-r--r-- | lib/Time/localtime.pm | 2 | ||||
-rw-r--r-- | lib/Time/tm.pm | 2 | ||||
-rw-r--r-- | lib/User/grent.pm | 2 | ||||
-rw-r--r-- | lib/User/pwent.pm | 2 |
11 files changed, 40 insertions, 10 deletions
diff --git a/lib/Class/Template.pm b/lib/Class/Template.pm index 23a0d5ba83..38c2e98e66 100644 --- a/lib/Class/Template.pm +++ b/lib/Class/Template.pm @@ -45,6 +45,8 @@ This module uses perl5 classes to create nested data types. =head1 EXAMPLES +=over + =item * Example 1 use Class::Template; @@ -83,6 +85,8 @@ This module uses perl5 classes to create nested data types. bless $r; } +=back + =head1 NOTES Use '%' if the member should point to an anonymous hash. Use '@' if the diff --git a/lib/ExtUtils/Embed.pm b/lib/ExtUtils/Embed.pm index 4d2ed6a77a..39d797e430 100644 --- a/lib/ExtUtils/Embed.pm +++ b/lib/ExtUtils/Embed.pm @@ -272,6 +272,8 @@ ccdlflags(), xsi_header(), xsi_protos(), xsi_body() =head1 FUNCTIONS +=over + =item xsinit() Generate C/C++ code for the XS initializer function. @@ -454,6 +456,8 @@ function to B<boot_ModuleName> for each @modules. B<xsinit()> uses the xsi_* functions to generate most of it's code. +=back + =head1 EXAMPLES For examples on how to use B<ExtUtils::Embed> for building C/C++ applications diff --git a/lib/ExtUtils/MM_VMS.pm b/lib/ExtUtils/MM_VMS.pm index aca41ea371..0e2897c1ad 100644 --- a/lib/ExtUtils/MM_VMS.pm +++ b/lib/ExtUtils/MM_VMS.pm @@ -36,6 +36,8 @@ the semantics. =head2 Methods always loaded +=over + =item eliminate_macros Expands MM[KS]/Make macros in a text string, using the contents of @@ -312,6 +314,7 @@ sub ext { ExtUtils::Liblist::ext(@_); } +=back =head2 SelfLoaded methods @@ -321,6 +324,8 @@ For overridden methods, documentation is limited to an explanation of why this method overrides the MM_Unix method; see the ExtUtils::MM_Unix documentation for more details. +=over + =item guess_name (override) Try to determine name of extension being built. We begin with the name @@ -1111,12 +1116,17 @@ default MM_Unix method. sub dist { my($self, %attribs) = @_; $attribs{VERSION} ||= $self->{VERSION_SYM}; + $attribs{NAME} ||= $self->{DISTNAME}; $attribs{ZIPFLAGS} ||= '-Vu'; $attribs{COMPRESS} ||= 'gzip'; $attribs{SUFFIX} ||= '-gz'; $attribs{SHAR} ||= 'vms_share'; $attribs{DIST_DEFAULT} ||= 'zipdist'; + # Sanitize these for use in $(DISTVNAME) filespec + $attribs{VERSION} =~ s/[^\w\$]/_/g; + $attribs{NAME} =~ s/[^\w\$]/_/g; + return ExtUtils::MM_Unix::dist($self,%attribs); } @@ -1745,28 +1755,28 @@ sub dist_core { my($self) = @_; q[ dist : $(DIST_DEFAULT) - $(NOECHO) $(PERL) -le "print 'Warning: $m older than $vf' if -e ($vf = '$(VERSION_FROM)') && -M $vf < -M ($m = '$(MAKEFILE)'" + $(NOECHO) $(PERL) -le "print 'Warning: $m older than $vf' if -e ($vf = '$(VERSION_FROM)') && -M $vf < -M ($m = '$(MAKEFILE)')" zipdist : $(DISTVNAME).zip $(NOECHO) $(NOOP) $(DISTVNAME).zip : distdir $(PREOP) - $(ZIP) "$(ZIPFLAGS)" $(MMS$TARGET) $(SRC) + $(ZIP) "$(ZIPFLAGS)" $(MMS$TARGET) [.$(DISTVNAME)...]*.*; $(RM_RF) $(DISTVNAME) $(POSTOP) $(DISTVNAME).tar$(SUFFIX) : distdir $(PREOP) $(TO_UNIX) - $(TAR) "$(TARFLAGS)" $(DISTVNAME).tar $(SRC) + $(TAR) "$(TARFLAGS)" $(DISTVNAME).tar [.$(DISTVNAME)] $(RM_RF) $(DISTVNAME) $(COMPRESS) $(DISTVNAME).tar $(POSTOP) shdist : distdir $(PREOP) - $(SHARE) $(SRC) $(DISTVNAME).share + $(SHAR) [.$(DISTVNAME...]*.*; $(DISTVNAME).share $(RM_RF) $(DISTVNAME) $(POSTOP) ]; @@ -2353,5 +2363,9 @@ sub nicetext { 1; +=back + +=cut + __END__ diff --git a/lib/ExtUtils/Mksymlists.pm b/lib/ExtUtils/Mksymlists.pm index eeed4bf794..4c6814cbcb 100644 --- a/lib/ExtUtils/Mksymlists.pm +++ b/lib/ExtUtils/Mksymlists.pm @@ -164,6 +164,8 @@ C<Mksymlists>, which is exported by default from C<ExtUtils::Mksymlists>. It takes one argument, a list of key-value pairs, in which the following keys are recognized: +=over + =item NAME This gives the name of the extension (I<e.g.> Tk::Canvas) for which @@ -217,6 +219,8 @@ extension itself (for instance, some linkers add an '_' to the name of the extension). If it is not specified, it is derived from the NAME attribute. It is presently used only by OS2. +=back + When calling C<Mksymlists>, one should always specify the NAME attribute. In most cases, this is all that's necessary. In the case of unusual extensions, however, the other attributes diff --git a/lib/File/Basename.pm b/lib/File/Basename.pm index dd7cdcf82e..6abfcd2cb4 100644 --- a/lib/File/Basename.pm +++ b/lib/File/Basename.pm @@ -95,6 +95,8 @@ would yield $dir eq 'Doc_Root:[Help]' $type eq '.Rnh' +=over + =item C<basename> The basename() routine returns the first element of the list produced @@ -116,6 +118,8 @@ cases. For example, for the input file specification F<lib/>, fileparse() considers the directory name to be F<lib/>, while dirname() considers the directory name to be F<.>). +=back + =cut require 5.002; diff --git a/lib/File/stat.pm b/lib/File/stat.pm index 014af60c5b..82cb3f6df3 100644 --- a/lib/File/stat.pm +++ b/lib/File/stat.pm @@ -50,7 +50,7 @@ __END__ =head1 NAME -File::stat.pm - by-name interface to Perl's built-in stat() functions +File::stat - by-name interface to Perl's built-in stat() functions =head1 SYNOPSIS diff --git a/lib/Time/gmtime.pm b/lib/Time/gmtime.pm index 35233f586a..353ade49ef 100644 --- a/lib/Time/gmtime.pm +++ b/lib/Time/gmtime.pm @@ -35,7 +35,7 @@ __END__ =head1 NAME -Time::gmtime.pm - by-name interface to Perl's built-in gmtime() function +Time::gmtime - by-name interface to Perl's built-in gmtime() function =head1 SYNOPSIS diff --git a/lib/Time/localtime.pm b/lib/Time/localtime.pm index 2e811e627f..8f7695b0f5 100644 --- a/lib/Time/localtime.pm +++ b/lib/Time/localtime.pm @@ -36,7 +36,7 @@ __END__ =head1 NAME -Time::localtime.pm - by-name interface to Perl's built-in localtime() function +Time::localtime - by-name interface to Perl's built-in localtime() function =head1 SYNOPSIS diff --git a/lib/Time/tm.pm b/lib/Time/tm.pm index d1df295683..7041432c0d 100644 --- a/lib/Time/tm.pm +++ b/lib/Time/tm.pm @@ -11,7 +11,7 @@ __END__ =head1 NAME -Time::tm.pm - internal object used by Time::gmtime and Time::localtime +Time::tm - internal object used by Time::gmtime and Time::localtime =head1 SYNOPSIS diff --git a/lib/User/grent.pm b/lib/User/grent.pm index 1185958430..3c4635ba2a 100644 --- a/lib/User/grent.pm +++ b/lib/User/grent.pm @@ -37,7 +37,7 @@ __END__ =head1 NAME -User::grent.pm - by-name interface to Perl's built-in getgr*() functions +User::grent - by-name interface to Perl's built-in getgr*() functions =head1 SYNOPSIS diff --git a/lib/User/pwent.pm b/lib/User/pwent.pm index 9f41fe9f39..a027fe627b 100644 --- a/lib/User/pwent.pm +++ b/lib/User/pwent.pm @@ -49,7 +49,7 @@ __END__ =head1 NAME -User::pwent.pm - by-name interface to Perl's built-in getpw*() functions +User::pwent - by-name interface to Perl's built-in getpw*() functions =head1 SYNOPSIS |