[libinline-java-perl] 396/398: use "our"
Jonas Smedegaard
dr at jones.dk
Thu Feb 26 11:43:29 UTC 2015
This is an automated email from the git hooks/post-receive script.
js pushed a commit to tag 0.55
in repository libinline-java-perl.
commit a360cbbd2c3b1745617870b7cc9a749dc34fc263
Author: Ed J <mohawk2 at users.noreply.github.com>
Date: Fri Nov 14 14:54:12 2014 +0000
use "our"
---
Java.pm | 20 +++++++-------------
1 file changed, 7 insertions(+), 13 deletions(-)
diff --git a/Java.pm b/Java.pm
index 1106416..a492dc0 100644
--- a/Java.pm
+++ b/Java.pm
@@ -1,25 +1,19 @@
-package Inline::Java ;
- at Inline::Java::ISA = qw(Inline Exporter) ;
-
-# Export the cast function if wanted
- at EXPORT_OK = qw(cast coerce study_classes caught jar j2sdk) ;
-
+package Inline::Java;
use strict ;
require 5.006 ;
-$Inline::Java::VERSION = '0.540' ;
+use base qw(Inline Exporter) ;
+# Export the cast function if wanted
+our @EXPORT_OK = qw(cast coerce study_classes caught jar j2sdk) ;
+our $VERSION = '0.55' ;
# DEBUG is set via the DEBUG config
-if (! defined($Inline::Java::DEBUG)){
- $Inline::Java::DEBUG = 0 ;
-}
+our $DEBUG = 0 unless defined $DEBUG;
-# Set DEBUG stream
-*DEBUG_STREAM = *STDERR ;
+*DEBUG_STREAM = *STDERR ; # Set DEBUG stream
-require Inline ;
use Carp ;
use Config ;
use File::Copy ;
--
Alioth's /usr/local/bin/git-commit-notice on /srv/git.debian.org/git/pkg-perl/packages/libinline-java-perl.git
More information about the Pkg-perl-cvs-commits
mailing list