r23385 - in /trunk/libsub-name-perl: Changes META.yml Makefile.PL Name.xs README debian/changelog debian/compat debian/control debian/copyright debian/libsub-name-perl.docs debian/rules lib/Sub/Name.pm t/smoke.t

ansgar-guest at users.alioth.debian.org ansgar-guest at users.alioth.debian.org
Sat Jul 19 09:19:53 UTC 2008


Author: ansgar-guest
Date: Sat Jul 19 09:19:51 2008
New Revision: 23385

URL: http://svn.debian.org/wsvn/pkg-perl/?sc=1&rev=23385
Log:
* New upstream release
  + debian/copyright: Update copyright years
* Regenerate rules for debhelper 7
  + update debian/control and debian/compat accordingly
* Add myself to Uploaders
* Bump Standards Version to 3.8.0 (no changes required)

Added:
    trunk/libsub-name-perl/debian/libsub-name-perl.docs
Modified:
    trunk/libsub-name-perl/Changes
    trunk/libsub-name-perl/META.yml
    trunk/libsub-name-perl/Makefile.PL
    trunk/libsub-name-perl/Name.xs
    trunk/libsub-name-perl/README
    trunk/libsub-name-perl/debian/changelog
    trunk/libsub-name-perl/debian/compat
    trunk/libsub-name-perl/debian/control
    trunk/libsub-name-perl/debian/copyright
    trunk/libsub-name-perl/debian/rules
    trunk/libsub-name-perl/lib/Sub/Name.pm
    trunk/libsub-name-perl/t/smoke.t

Modified: trunk/libsub-name-perl/Changes
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libsub-name-perl/Changes?rev=23385&op=diff
==============================================================================
--- trunk/libsub-name-perl/Changes (original)
+++ trunk/libsub-name-perl/Changes Sat Jul 19 09:19:51 2008
@@ -1,4 +1,5 @@
-$Id: Changes,v 1.1 2004/08/18 17:53:45 xmath Exp $
+0.04 -- Fri Jul 18 15:23 CEST 2008
+    * Fixed for perl 5.6 and 5.005 threads (tested)
 
 0.03 -- Wed Feb 20 20:19 CET 2008
     * Fixed crash when trying to rename xsubs

Modified: trunk/libsub-name-perl/META.yml
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libsub-name-perl/META.yml?rev=23385&op=diff
==============================================================================
--- trunk/libsub-name-perl/META.yml (original)
+++ trunk/libsub-name-perl/META.yml Sat Jul 19 09:19:51 2008
@@ -1,10 +1,13 @@
-# http://module-build.sourceforge.net/META-spec.html
-#XXXXXXX This is a prototype!!!  It will change in the future!!! XXXXX#
-name:         Sub-Name
-version:      0.03
-version_from: lib/Sub/Name.pm
-installdirs:  site
-requires:
-
-distribution_type: module
-generated_by: ExtUtils::MakeMaker version 6.17
+--- #YAML:1.0
+name:                Sub-Name
+version:             0.04
+abstract:            (re)name a sub
+license:             ~
+author:              
+    - Matthijs van Duin <xmath at cpan.org>
+generated_by:        ExtUtils::MakeMaker version 6.42
+distribution_type:   module
+requires:     
+meta-spec:
+    url:     http://module-build.sourceforge.net/META-spec-v1.3.html
+    version: 1.3

Modified: trunk/libsub-name-perl/Makefile.PL
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libsub-name-perl/Makefile.PL?rev=23385&op=diff
==============================================================================
--- trunk/libsub-name-perl/Makefile.PL (original)
+++ trunk/libsub-name-perl/Makefile.PL Sat Jul 19 09:19:51 2008
@@ -1,5 +1,3 @@
-# $Id: Makefile.PL,v 1.1 2004/08/17 19:23:24 xmath Exp $
-
 use 5.006;
 use ExtUtils::MakeMaker;
 

Modified: trunk/libsub-name-perl/Name.xs
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libsub-name-perl/Name.xs?rev=23385&op=diff
==============================================================================
--- trunk/libsub-name-perl/Name.xs (original)
+++ trunk/libsub-name-perl/Name.xs Sat Jul 19 09:19:51 2008
@@ -1,5 +1,4 @@
-/* $Id: Name.xs,v 1.5 2004/08/18 13:21:44 xmath Exp $
- * Copyright (C) 2004  Matthijs van Duin.  All rights reserved.
+/* Copyright (C) 2004, 2008  Matthijs van Duin.  All rights reserved.
  * This program is free software; you can redistribute it and/or modify 
  * it under the same terms as Perl itself.
  */
@@ -9,6 +8,15 @@
 #include "XSUB.h"
 
 static MGVTBL subname_vtbl;
+
+#ifndef PERL_MAGIC_ext
+# define PERL_MAGIC_ext '~'
+#endif
+
+#ifndef SvMAGIC_set
+#define SvMAGIC_set(sv, val) (SvMAGIC(sv) = (val))
+#endif
+
 
 MODULE = Sub::Name  PACKAGE = Sub::Name
 
@@ -60,16 +68,20 @@
 	if (CvPADLIST(cv)) {
 		/* cheap way to refcount the gv */
 		av_store((AV *) AvARRAY(CvPADLIST(cv))[0], 0, (SV *) gv);
-	}
+	} else
 #endif
-	else {
+	{
 		/* expensive way to refcount the gv */
 		MAGIC *mg = SvMAGIC(cv);
 		while (mg && mg->mg_virtual != &subname_vtbl)
 			mg = mg->mg_moremagic;
-		if (!mg)
-			mg = sv_magicext((SV *) cv, NULL, PERL_MAGIC_ext,
-					&subname_vtbl, NULL, 0);
+		if (!mg) {
+			Newz(702, mg, 1, MAGIC);
+			mg->mg_moremagic = SvMAGIC(cv);
+			mg->mg_type = PERL_MAGIC_ext;
+			mg->mg_virtual = &subname_vtbl;
+			SvMAGIC_set(cv, mg);
+		}
 		if (mg->mg_flags & MGf_REFCOUNTED)
 			SvREFCNT_dec(mg->mg_obj);
 		mg->mg_flags |= MGf_REFCOUNTED;

Modified: trunk/libsub-name-perl/README
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libsub-name-perl/README?rev=23385&op=diff
==============================================================================
--- trunk/libsub-name-perl/README (original)
+++ trunk/libsub-name-perl/README Sat Jul 19 09:19:51 2008
@@ -1,6 +1,4 @@
-$Id: README,v 1.5 2004/08/18 17:53:45 xmath Exp $
-
-Sub::Name 0.01
+Sub::Name 0.04
 
 To install this module type the following:
 
@@ -41,6 +39,6 @@
 AUTHOR
     Matthijs van Duin <xmath at cpan.org>
 
-    Copyright (C) 2004 Matthijs van Duin. All rights reserved. This program
-    is free software; you can redistribute it and/or modify it under the
-    same terms as Perl itself.
+    Copyright (C) 2004, 2008 Matthijs van Duin. All rights reserved. This
+    program is free software; you can redistribute it and/or modify it under
+    the same terms as Perl itself.

Modified: trunk/libsub-name-perl/debian/changelog
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libsub-name-perl/debian/changelog?rev=23385&op=diff
==============================================================================
--- trunk/libsub-name-perl/debian/changelog (original)
+++ trunk/libsub-name-perl/debian/changelog Sat Jul 19 09:19:51 2008
@@ -1,8 +1,13 @@
-libsub-name-perl (0.03-2) UNRELEASED; urgency=low
+libsub-name-perl (0.04-1) unstable; urgency=low
 
-  * debian/control: adjust versioned dependency on debhelper to debian/compat.
+  * New upstream release
+    + debian/copyright: Update copyright years
+  * Regenerate rules for debhelper 7
+    + update debian/control and debian/compat accordingly
+  * Add myself to Uploaders
+  * Bump Standards Version to 3.8.0 (no changes required)
 
- -- gregor herrmann <gregoa at debian.org>  Sat, 07 Jun 2008 02:23:17 +0200
+ -- Ansgar Burchardt <ansgar at 43-1.org>  Sat, 19 Jul 2008 11:09:58 +0200
 
 libsub-name-perl (0.03-1) unstable; urgency=low
 

Modified: trunk/libsub-name-perl/debian/compat
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libsub-name-perl/debian/compat?rev=23385&op=diff
==============================================================================
--- trunk/libsub-name-perl/debian/compat (original)
+++ trunk/libsub-name-perl/debian/compat Sat Jul 19 09:19:51 2008
@@ -1,1 +1,1 @@
-6
+7

Modified: trunk/libsub-name-perl/debian/control
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libsub-name-perl/debian/control?rev=23385&op=diff
==============================================================================
--- trunk/libsub-name-perl/debian/control (original)
+++ trunk/libsub-name-perl/debian/control Sat Jul 19 09:19:51 2008
@@ -1,14 +1,14 @@
 Source: libsub-name-perl
 Section: perl
 Priority: optional
-Build-Depends: perl (>= 5.8.0-7), debhelper (>= 6)
+Build-Depends: perl (>= 5.8.0-7), debhelper (>= 7)
 Maintainer: Debian Perl Group <pkg-perl-maintainers at lists.alioth.debian.org>
-Uploaders: Krzysztof Krzyżaniak (eloy) <eloy at debian.org>
-Standards-Version: 3.7.3
+Uploaders: Krzysztof Krzyżaniak (eloy) <eloy at debian.org>,
+ Ansgar Burchardt <ansgar at 43-1.org>
+Standards-Version: 3.8.0
 Homepage: http://search.cpan.org/dist/Sub-Name/
 Vcs-Svn: svn://svn.debian.org/pkg-perl/trunk/libsub-name-perl/
 Vcs-Browser: http://svn.debian.org/wsvn/pkg-perl/trunk/libsub-name-perl/
-
 
 Package: libsub-name-perl
 Architecture: any

Modified: trunk/libsub-name-perl/debian/copyright
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libsub-name-perl/debian/copyright?rev=23385&op=diff
==============================================================================
--- trunk/libsub-name-perl/debian/copyright (original)
+++ trunk/libsub-name-perl/debian/copyright Sat Jul 19 09:19:51 2008
@@ -5,7 +5,7 @@
 
 The upstream author is: Matthijs van Duin <xmath at cpan.org>
 
-Copyright (C) 2004  Matthijs van Duin.  All rights reserved.
+Copyright (C) 2004, 2008  Matthijs van Duin.  All rights reserved.
 
 This program is free software, you can redistribute it and/or modify it under
 the same terms as Perl itself.

Added: trunk/libsub-name-perl/debian/libsub-name-perl.docs
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libsub-name-perl/debian/libsub-name-perl.docs?rev=23385&op=file
==============================================================================
--- trunk/libsub-name-perl/debian/libsub-name-perl.docs (added)
+++ trunk/libsub-name-perl/debian/libsub-name-perl.docs Sat Jul 19 09:19:51 2008
@@ -1,0 +1,1 @@
+README

Modified: trunk/libsub-name-perl/debian/rules
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libsub-name-perl/debian/rules?rev=23385&op=diff
==============================================================================
--- trunk/libsub-name-perl/debian/rules (original)
+++ trunk/libsub-name-perl/debian/rules Sat Jul 19 09:19:51 2008
@@ -1,80 +1,23 @@
 #!/usr/bin/make -f
-# This debian/rules file is provided as a template for normal perl
-# packages. It was created by Marc Brockschmidt <marc at dch-faq.de> for
-# the Debian Perl Group (http://pkg-perl.alioth.debian.org/) but may
-# be used freely wherever it is useful.
-
-# Uncomment this to turn on verbose mode.
-#export DH_VERBOSE=1
-
-# If set to a true value then MakeMaker's prompt function will
-# always return the default without waiting for user input.
-export PERL_MM_USE_DEFAULT=1
-
-PACKAGE=$(shell dh_listpackages)
-
-ifndef PERL
-PERL = /usr/bin/perl
-endif
-
-TMP     =$(CURDIR)/debian/$(PACKAGE)
-
-# Allow disabling build optimation by setting noopt in
-# $DEB_BUILD_OPTIONS
-CFLAGS = -Wall -g
-ifneq (,$(findstring noopt,$(DEB_BUILD_OPTIONS)))
-        CFLAGS += -O0
-else
-        CFLAGS += -O2
-endif
 
 build: build-stamp
 build-stamp:
-	$(PERL) Makefile.PL INSTALLDIRS=vendor
-	$(MAKE) OPTIMIZE="$(CFLAGS)" LD_RUN_PATH=""
-	touch build-stamp
+	dh build
+	touch $@
 
 clean:
-	dh_testdir
-	dh_testroot
-	[ ! -f Makefile ] || $(MAKE) realclean
-	dh_clean build-stamp install-stamp
+	dh $@
 
-install: build install-stamp
-install-stamp:
-	dh_testdir
-	dh_testroot
-	dh_clean -k
-	$(MAKE) test
-	$(MAKE) install DESTDIR=$(TMP) PREFIX=/usr
-	[ ! -d $(TMP)/usr/share/perl5 ] || rmdir --ignore-fail-on-non-empty --parents --verbose $(TMP)/usr/share/perl5
-	touch install-stamp
+install: install-stamp
+install-stamp: build-stamp
+	dh install
+	touch $@
 
-# Build architecture-independent files here.
-binary-indep: build install
-# We have nothing to do by default.
+binary-arch: install
+	dh $@
 
-# Build architecture-dependent files here.
-binary-arch: build install
-	dh_testdir
-	dh_testroot
-	dh_installdocs README
-	dh_installexamples 
-	dh_installchangelogs Changes
-	dh_link
-	dh_strip
-	dh_compress
-	dh_fixperms
-	dh_makeshlibs
-	dh_installdeb
-	dh_perl 
-	dh_shlibdeps
-	dh_gencontrol
-	dh_md5sums
-	dh_builddeb
+binary-indep:
 
-source diff:                                                                  
-	@echo >&2 'source and diff are obsolete - use dpkg-source -b'; false
+binary: binary-arch binary-indep
 
-binary: binary-indep binary-arch
-.PHONY: build clean binary-indep binary-arch binary
+.PHONY: binary binary-arch binary-indep install clean build

Modified: trunk/libsub-name-perl/lib/Sub/Name.pm
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libsub-name-perl/lib/Sub/Name.pm?rev=23385&op=diff
==============================================================================
--- trunk/libsub-name-perl/lib/Sub/Name.pm (original)
+++ trunk/libsub-name-perl/lib/Sub/Name.pm Sat Jul 19 09:19:51 2008
@@ -1,5 +1,3 @@
-# $Id: Name.pm,v 1.5 2004/08/18 17:53:45 xmath Exp $
-
 package Sub::Name;
 
 =head1 NAME
@@ -35,7 +33,7 @@
 
 Matthijs van Duin <xmath at cpan.org>
 
-Copyright (C) 2004  Matthijs van Duin.  All rights reserved.
+Copyright (C) 2004, 2008  Matthijs van Duin.  All rights reserved.
 This program is free software; you can redistribute it and/or modify 
 it under the same terms as Perl itself.
 
@@ -46,7 +44,7 @@
 use strict;
 use warnings;
 
-our $VERSION = '0.03';
+our $VERSION = '0.04';
 
 use base 'Exporter';
 use base 'DynaLoader';

Modified: trunk/libsub-name-perl/t/smoke.t
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libsub-name-perl/t/smoke.t?rev=23385&op=diff
==============================================================================
--- trunk/libsub-name-perl/t/smoke.t (original)
+++ trunk/libsub-name-perl/t/smoke.t Sat Jul 19 09:19:51 2008
@@ -26,5 +26,4 @@
 	print $x->() eq "Blork::Dynamic $_" ? "ok $_\n" : "not ok $_\n";
 }
 
-# $Id: smoke.t,v 1.4 2004/08/18 12:03:42 xmath Exp $
 # vim: ft=perl




More information about the Pkg-perl-cvs-commits mailing list