[libreligion-islam-prayertimes-perl] 01/01: Imported Debian patch 1.02-1

Xavier Guimard xguimard-guest at moszumanska.debian.org
Sun Dec 1 19:54:28 UTC 2013


This is an automated email from the git hooks/post-receive script.

xguimard-guest pushed a commit to branch master
in repository libreligion-islam-prayertimes-perl.

commit 9a035cdcb727456f4c70e8dfda521e902ad946cc
Author: Xavier Guimard <x.guimard at free.fr>
Date:   Sun Dec 1 20:46:08 2013 +0100

    Imported Debian patch 1.02-1
---
 debian/changelog                               |   5 +
 debian/compat                                  |   1 +
 debian/control                                 |  18 ++
 debian/copyright                               |  28 ++
 debian/patches/change-bad-comment-format.patch | 389 +++++++++++++++++++++++++
 debian/patches/series                          |   1 +
 debian/rules                                   |   4 +
 debian/source/format                           |   1 +
 debian/watch                                   |   2 +
 9 files changed, 449 insertions(+)

diff --git a/debian/changelog b/debian/changelog
new file mode 100644
index 0000000..acc7804
--- /dev/null
+++ b/debian/changelog
@@ -0,0 +1,5 @@
+libreligion-islam-prayertimes-perl (1.02-1) unstable; urgency=low
+
+  * Initial Release (Closes: #731083)
+
+ -- Xavier Guimard <x.guimard at free.fr>  Sun, 01 Dec 2013 20:46:08 +0100
diff --git a/debian/compat b/debian/compat
new file mode 100644
index 0000000..45a4fb7
--- /dev/null
+++ b/debian/compat
@@ -0,0 +1 @@
+8
diff --git a/debian/control b/debian/control
new file mode 100644
index 0000000..8f29f4e
--- /dev/null
+++ b/debian/control
@@ -0,0 +1,18 @@
+Source: libreligion-islam-prayertimes-perl
+Section: perl
+Priority: optional
+Maintainer: Debian Perl Group <pkg-perl-maintainers at lists.alioth.debian.org>
+Uploaders: Xavier Guimard <x.guimard at free.fr>
+Build-Depends: debhelper (>= 8)
+Build-Depends-Indep: perl
+Standards-Version: 3.9.5
+Vcs-Browser: http://anonscm.debian.org/gitweb/?p=pkg-perl/packages/libreligion-islam-prayertimes-perl.git
+Vcs-Git: git://anonscm.debian.org/pkg-perl/packages/libreligion-islam-prayertimes-perl.git
+Homepage: https://metacpan.org/release/Religion-Islam-PrayerTimes
+
+Package: libreligion-islam-prayertimes-perl
+Architecture: all
+Depends: ${misc:Depends}, ${perl:Depends}
+Description: Perl module that calculates Muslim Prayers Times and Sunrise
+ Religion::Islam::PrayerTimes calculates Muslim prayers times and sunrise for
+ any location on the earth.
diff --git a/debian/copyright b/debian/copyright
new file mode 100644
index 0000000..76cbf0d
--- /dev/null
+++ b/debian/copyright
@@ -0,0 +1,28 @@
+Format: http://www.debian.org/doc/packaging-manuals/copyright-format/1.0/
+Source: https://metacpan.org/release/Religion-Islam-PrayerTimes
+Upstream-Contact: Ahmed Amin Elsheshtawy <support at islamware.com
+Upstream-Name: Religion-Islam-PrayerTimes
+
+Files: *
+Copyright: 2006, Ahmed Amin Elsheshtawy <support at islamware.com>
+License: Artistic or GPL-1+
+
+Files: debian/*
+Copyright: 2013, Xavier Guimard <x.guimard at free.fr>
+License: Artistic or GPL-1+
+
+License: Artistic
+ This program is free software; you can redistribute it and/or modify
+ it under the terms of the Artistic License, which comes with Perl.
+ .
+ On Debian systems, the complete text of the Artistic License can be
+ found in `/usr/share/common-licenses/Artistic'.
+
+License: GPL-1+
+ This program is free software; you can redistribute it and/or modify
+ it under the terms of the GNU General Public License as published by
+ the Free Software Foundation; either version 1, or (at your option)
+ any later version.
+ .
+ On Debian systems, the complete text of version 1 of the GNU General
+ Public License can be found in `/usr/share/common-licenses/GPL-1'.
diff --git a/debian/patches/change-bad-comment-format.patch b/debian/patches/change-bad-comment-format.patch
new file mode 100644
index 0000000..d9785d3
--- /dev/null
+++ b/debian/patches/change-bad-comment-format.patch
@@ -0,0 +1,389 @@
+Description: Corrects bad comment format
+Author: Xavier Guimard <x.guimard at free.fr>
+Bug: https://rt.cpan.org/Ticket/Display.html?id=91096
+Forwarded: https://rt.cpan.org/Ticket/Display.html?id=91096
+Last-Update: 2013-12-01
+
+--- libreligion-islam-prayertimes-perl-1.02.orig/lib/Religion/Islam/PrayerTimes.pm
++++ libreligion-islam-prayertimes-perl-1.02/lib/Religion/Islam/PrayerTimes.pm
+@@ -1080,15 +1080,15 @@ my ($IshRt, $FajrRt);
+ 	return ($IshRt, $FajrRt);
+ }
+ #==========================================================
+-=BH2GA
+-Name:    BH2GA                                                      
+-Type:    Procedure                                                 
+-Purpose: Finds Gdate(year,month,day) for Hdate(year,month,day=1)  	
+-Arguments:                                                         
+-Input: Hijrah  date: year:yh, month:mh                             
+-Output: Gregorian date: year:yg, month:mg, day:dg , day of week:dayweek
+-      and returns flag found:1 not found:0                         
+-=cut
++#=BH2GA
++#Name:    BH2GA                                                      
++#Type:    Procedure                                                 
++#Purpose: Finds Gdate(year,month,day) for Hdate(year,month,day=1)  	
++#Arguments:                                                         
++#Input: Hijrah  date: year:yh, month:mh                             
++#Output: Gregorian date: year:yg, month:mg, day:dg , day of week:dayweek
++#      and returns flag found:1 not found:0                         
++#=cut
+ # ($yg1, $mg1, $dg1, $dw2) = &BH2GA($yh2,$mh2);
+ sub BH2GA{
+ my ($self, $yh, $mh) = @_;
+@@ -1111,14 +1111,14 @@ my ($yg, $mg, $dg, $dayweek);
+ 	return ($flag, $yg, $mg, $dg, $dayweek);
+ }
+ #==========================================================
+-=HCalendarToJDA
+-Name:    HCalendarToJDA						
+-Type:    Function                                                  
+-Purpose: convert Hdate(year,month,day) to Exact Julian Day     	
+-Arguments:                                                         
+-Input : Hijrah  date: year:yh, month:mh, day:dh                    
+-Output:  The Exact Julian Day: JD                                  
+-=cut
++#=HCalendarToJDA
++#Name:    HCalendarToJDA						
++#Type:    Function                                                  
++#Purpose: convert Hdate(year,month,day) to Exact Julian Day     	
++#Arguments:                                                         
++#Input : Hijrah  date: year:yh, month:mh, day:dh                    
++#Output:  The Exact Julian Day: JD                                  
++#=cut
+ # $GJD= &HCalendarToJDA($yh,$mh,1);
+ sub HCalendarToJDA{
+ my ($self, $yh, $mh, $dh) = @_;
+@@ -1143,15 +1143,15 @@ my ($self, $yh, $mh, $dh) = @_;
+ 	return $GJD;
+ }
+ #==========================================================
+-=HMonthLength
+-Name:    HMonthLength						
+-Type:    Function                                                  
+-Purpose: Obtains the month length            		     	
+-Arguments:                                                         
+-Input : Hijrah  date: year:yh, month:mh                            
+-Output:  Month Length                                              
+-int HMonthLength(int yh,int mh)
+-=cut
++#=HMonthLength
++#Name:    HMonthLength						
++#Type:    Function                                                  
++#Purpose: Obtains the month length            		     	
++#Arguments:                                                         
++#Input : Hijrah  date: year:yh, month:mh                            
++#Output:  Month Length                                              
++#int HMonthLength(int yh,int mh)
++#=cut
+ sub HMonthLength{
+ my ($self, $yh, $mh) = @_;
+  
+@@ -1177,15 +1177,15 @@ my ($self, $yh, $mh) = @_;
+ 	return $Dy;
+ }
+ #==========================================================
+-=DayInYear
+-Name:    DayInYear							
+-Type:    Function                                                  
+-Purpose: Obtains the day number in the yea          		     	
+-Arguments:                                                         
+-Input : Hijrah  date: year:yh, month:mh  day:dh                    
+-Output:  Day number in the Year					
+-int DayinYear(int yh,int mh,int dh)
+-=cut
++#=DayInYear
++#Name:    DayInYear							
++#Type:    Function                                                  
++#Purpose: Obtains the day number in the yea          		     	
++#Arguments:                                                         
++#Input : Hijrah  date: year:yh, month:mh  day:dh                    
++#Output:  Day number in the Year					
++#int DayinYear(int yh,int mh,int dh)
++#=cut
+ sub DayinYear{
+ my ($self, $yh, $mh, $dh) = @_;
+   
+@@ -1214,15 +1214,15 @@ my ($self, $yh, $mh, $dh) = @_;
+ 	return $DL;
+ }
+ #==========================================================
+-=HYearLength
+-Name:    HYearLength						    	
+-Type:    Function                                                  
+-Purpose: Obtains the year length            		     	    	
+-Arguments:                                                         
+-Input : Hijrah  date: year:yh                                  	
+-Output:  Year Length                                               
+-int HYearLength(int yh)
+-=cut
++#=HYearLength
++#Name:    HYearLength						    	
++#Type:    Function                                                  
++#Purpose: Obtains the year length            		     	    	
++#Arguments:                                                         
++#Input : Hijrah  date: year:yh                                  	
++#Output:  Year Length                                               
++#int HYearLength(int yh)
++#=cut
+ sub HYearLength{
+ my ($self, $yh) = @_;
+  
+@@ -1252,16 +1252,16 @@ my ($self, $yh) = @_;
+ }
+ 
+ #==========================================================
+-=G2HA
+-Name:    G2HA                                                      
+-Type:    Procedure                                                 
+-Purpose: convert Gdate(year,month,day) to Hdate(year,month,day)    
+-Arguments:                                                         
+-Input: Gregorian date: year:yg, month:mg, day:dg                   
+-Output: Hijrah  date: year:yh, month:mh, day:dh, day of week:dayweek
+-      and returns flag found:1 not found:0                         
+-int  G2HA(int yg,int mg, int dg,int *yh,int *mh,int *dh,int *dayweek)
+-=cut
++#=G2HA
++#Name:    G2HA                                                      
++#Type:    Procedure                                                 
++#Purpose: convert Gdate(year,month,day) to Hdate(year,month,day)    
++#Arguments:                                                         
++#Input: Gregorian date: year:yg, month:mg, day:dg                   
++#Output: Hijrah  date: year:yh, month:mh, day:dh, day of week:dayweek
++#      and returns flag found:1 not found:0                         
++#int  G2HA(int yg,int mg, int dg,int *yh,int *mh,int *dh,int *dayweek)
++#=cut
+ sub G2HA{
+ my ($self, $yg, $mg, $dg) = @_;
+ my ($yh, $mh, $dh, $dayweek);
+@@ -1306,17 +1306,17 @@ my ($yh, $mh, $dh, $dayweek);
+ 	return ($flag, $yh, $mh, $dh, $dayweek);
+ }
+ #==========================================================
+-=H2GA
+-Name:    H2GA                                                      
+-Type:    Procedure                                                 
+-Purpose: convert Hdate(year,month,day) to Gdate(year,month,day)    
+-Arguments:                                                         
+-Input/Ouput: Hijrah  date: year:yh, month:mh, day:dh               
+-Output: Gregorian date: year:yg, month:mg, day:dg , day of week:dayweek
+-      and returns flag found:1 not found:0                         
+-Note: The function will correct Hdate if day=30 and the month is 29 only
+-int  H2GA(int *yh,int *mh,int *dh, int *yg,int *mg, int *dg,int *dayweek)
+-=cut
++#=H2GA
++#Name:    H2GA                                                      
++#Type:    Procedure                                                 
++#Purpose: convert Hdate(year,month,day) to Gdate(year,month,day)    
++#Arguments:                                                         
++#Input/Ouput: Hijrah  date: year:yh, month:mh, day:dh               
++#Output: Gregorian date: year:yg, month:mg, day:dg , day of week:dayweek
++#      and returns flag found:1 not found:0                         
++#Note: The function will correct Hdate if day=30 and the month is 29 only
++#int  H2GA(int *yh,int *mh,int *dh, int *yg,int *mg, int *dg,int *dayweek)
++#=cut
+ sub H2GA{
+ my ($self, $yh, $mh, $dh, $yg, $mg, $dg, $dayweek) = @_;
+ 
+@@ -1349,15 +1349,15 @@ my ($self, $yh, $mh, $dh, $yg, $mg, $dg,
+    return ($found, $yg, $mg, $dg, $dayweek);
+ }
+ #==========================================================
+-=JDToGCalendar
+-Name:    JDToGCalendar						
+-Type:    Procedure                                                 
+-Purpose: convert Julian Day  to Gdate(year,month,day)              
+-Arguments:                                                         
+-Input:  The Julian Day: JD                                         
+-Output: Gregorian date: year:yy, month:mm, day:dd                  
+-double JDToGCalendar(double JD, int *yy,int *mm, int *dd)
+-=cut
++#=JDToGCalendar
++#Name:    JDToGCalendar						
++#Type:    Procedure                                                 
++#Purpose: convert Julian Day  to Gdate(year,month,day)              
++#Arguments:                                                         
++#Input:  The Julian Day: JD                                         
++#Output: Gregorian date: year:yy, month:mm, day:dd                  
++#double JDToGCalendar(double JD, int *yy,int *mm, int *dd)
++#=cut
+ # (undef, $yg, $mg, $dg) = &JDToGCalendar($GJD);
+ sub JDToGCalendar{
+ my ($self, $JD) = @_;
+@@ -1392,15 +1392,15 @@ my ($D, $Z);
+ 	return ($F, $yy, $mm, $dd);
+ }
+ #==========================================================
+-=GCalendarToJD
+-Name:    GCalendarToJD						
+-Type:    Function                                                  
+-Purpose: convert Gdate(year,month,day) to Julian Day            	
+-Arguments:                                                         
+-Input : Gregorian date: year:yy, month:mm, day:dd                  
+-Output:  The Julian Day: JD                                        
+-double GCalendarToJD(int yy,int mm, double dd)
+-=cut
++#=GCalendarToJD
++#Name:    GCalendarToJD						
++#Type:    Function                                                  
++#Purpose: convert Gdate(year,month,day) to Julian Day            	
++#Arguments:                                                         
++#Input : Gregorian date: year:yy, month:mm, day:dd                  
++#Output:  The Julian Day: JD                                        
++#double GCalendarToJD(int yy,int mm, double dd)
++#=cut
+ 
+ sub GCalendarToJD{
+ my ($self, $yy, $mm, $dd) = @_;
+@@ -1425,15 +1425,15 @@ my ($T1, $T2, $Tr);
+ 	return (int $Tr);
+ }
+ #==========================================================
+-=GLeapYear
+-Name:    GLeapYear						      
+-Type:    Function                                                  
+-Purpose: Determines if  Gdate(year) is leap or not            	
+-Arguments:                                                         
+-Input : Gregorian date: year				              
+-Output:  0:year not leap   1:year is leap                          
+-int GLeapYear(int year)
+-=cut
++#=GLeapYear
++#Name:    GLeapYear						      
++#Type:    Function                                                  
++#Purpose: Determines if  Gdate(year) is leap or not            	
++#Arguments:                                                         
++#Input : Gregorian date: year				              
++#Output:  0:year not leap   1:year is leap                          
++#int GLeapYear(int year)
++#=cut
+ sub GLeapYear{
+ my ($self, $year) = @_;
+ my ($T);
+@@ -1448,16 +1448,16 @@ my ($T);
+ 	return ($T);
+ }
+ #==========================================================
+-=GDateAjust
+-Name:    GDateAjust							
+-Type:    Procedure                                                 
+-Purpose: Adjust the G Dates by making sure that the month lengths  
+-	    are correct if not so take the extra days to next month or year
+-Arguments:                                                         
+-Input: Gregorian date: year:yg, month:mg, day:dg                   
+-Output: corrected Gregorian date: year:yg, month:mg, day:dg        
+-void GDateAjust(int *yg,int *mg,int *dg)
+-=cut
++#=GDateAjust
++#Name:    GDateAjust							
++#Type:    Procedure                                                 
++#Purpose: Adjust the G Dates by making sure that the month lengths  
++#	    are correct if not so take the extra days to next month or year
++#Arguments:                                                         
++#Input: Gregorian date: year:yg, month:mg, day:dg                   
++#Output: corrected Gregorian date: year:yg, month:mg, day:dg        
++#void GDateAjust(int *yg,int *mg,int *dg)
++#=cut
+ sub GDateAjust{
+ my ($self, $yg, $mg, $dg) = @_;
+ my ($dys);
+@@ -1519,15 +1519,15 @@ my ($dys);
+ 	return ($yg, $mg, $dg);
+ }
+ #==========================================================
+-=DayWeek
+-  The day of the week is obtained as
+-  Dy=(Julian+1)%7
+-  Dy=0 Sunday
+-  Dy=1 Monday
+-  ...
+-  Dy=6 Saturday
+-int DayWeek(long JulianD)
+-=cut
++#=DayWeek
++#  The day of the week is obtained as
++#  Dy=(Julian+1)%7
++#  Dy=0 Sunday
++#  Dy=1 Monday
++#  ...
++#  Dy=6 Saturday
++#int DayWeek(long JulianD)
++#=cut
+ sub DayWeek{
+ my ($self, $JulianD) = @_;
+ my ($Dy);
+@@ -1535,15 +1535,15 @@ my ($Dy);
+ 	return ($Dy);
+ }
+ #==========================================================
+-=HCalendarToJD
+-Name:    HCalendarToJD						
+-Type:    Function                                                  
+-Purpose: convert Hdate(year,month,day) to estimated Julian Day     	
+-Arguments:                                                         
+-Input : Hijrah  date: year:yh, month:mh, day:dh                    
+-Output:  The Estimated Julian Day: JD                              
+-double HCalendarToJD(int yh,int mh,int dh)
+-=cut
++#=HCalendarToJD
++#Name:    HCalendarToJD						
++#Type:    Function                                                  
++#Purpose: convert Hdate(year,month,day) to estimated Julian Day     	
++#Arguments:                                                         
++#Input : Hijrah  date: year:yh, month:mh, day:dh                    
++#Output:  The Estimated Julian Day: JD                              
++#double HCalendarToJD(int yh,int mh,int dh)
++#=cut
+ sub HCalendarToJD{
+ my ($self, $yh, $mh, $dh) = @_;
+  my ($md, $yd);
+@@ -1556,15 +1556,15 @@ my ($self, $yh, $mh, $dh) = @_;
+ 	return $yd;
+ }
+ #==========================================================
+-=JDToHCalendar
+-Name:    JDToHCalendar						
+-Type:    Procedure                                                 
+-Purpose: convert Julian Day to estimated Hdate(year,month,day)	
+-Arguments:                                                         
+-Input:  The Julian Day: JD                                         
+-Output : Hijrah date: year:yh, month:mh, day:dh                    
+-void JDToHCalendar(double JD,int *yh,int *mh,int *dh)
+-=cut
++#=JDToHCalendar
++#Name:    JDToHCalendar						
++#Type:    Procedure                                                 
++#Purpose: convert Julian Day to estimated Hdate(year,month,day)	
++#Arguments:                                                         
++#Input:  The Julian Day: JD                                         
++#Output : Hijrah date: year:yh, month:mh, day:dh                    
++#void JDToHCalendar(double JD,int *yh,int *mh,int *dh)
++#=cut
+ #Estimating the hijrah date from JD
+ sub JDToHCalendar{
+ my ($self, $JD) = @_;
+@@ -1582,15 +1582,15 @@ my ($md, $yd);
+ 	return ($yh, $mh, $dh);
+ }
+ #==========================================================
+-=JDToHACalendar
+-Name:    JDToHACalendar						
+-Type:    Procedure                                                 
+-Purpose: convert Julian Day to  Hdate(year,month,day)	    	
+-Arguments:                                                         
+-Input:  The Julian Day: JD                                         
+-Output : Hijrah date: year:yh, month:mh, day:dh                    
+-void JDToHACalendar(double JD,int *yh,int *mh,int *dh)
+-=cut
++#=JDToHACalendar
++#Name:    JDToHACalendar						
++#Type:    Procedure                                                 
++#Purpose: convert Julian Day to  Hdate(year,month,day)	    	
++#Arguments:                                                         
++#Input:  The Julian Day: JD                                         
++#Output : Hijrah date: year:yh, month:mh, day:dh                    
++#void JDToHACalendar(double JD,int *yh,int *mh,int *dh)
++#=cut
+ sub JDToHACalendar{
+ my ($self, $JD) = @_;
+ my ($yh, $mh, $dh);
diff --git a/debian/patches/series b/debian/patches/series
new file mode 100644
index 0000000..5432c3c
--- /dev/null
+++ b/debian/patches/series
@@ -0,0 +1 @@
+change-bad-comment-format.patch
diff --git a/debian/rules b/debian/rules
new file mode 100755
index 0000000..2d33f6a
--- /dev/null
+++ b/debian/rules
@@ -0,0 +1,4 @@
+#!/usr/bin/make -f
+
+%:
+	dh $@
diff --git a/debian/source/format b/debian/source/format
new file mode 100644
index 0000000..163aaf8
--- /dev/null
+++ b/debian/source/format
@@ -0,0 +1 @@
+3.0 (quilt)
diff --git a/debian/watch b/debian/watch
new file mode 100644
index 0000000..34a61c1
--- /dev/null
+++ b/debian/watch
@@ -0,0 +1,2 @@
+version=3
+https://metacpan.org/release/Religion-Islam-PrayerTimes   .*/Religion-Islam-PrayerTimes-v?(\d[\d.-]*)\.(?:tar(?:\.gz|\.bz2)?|tgz|zip)$

-- 
Alioth's /usr/local/bin/git-commit-notice on /srv/git.debian.org/git/pkg-perl/packages/libreligion-islam-prayertimes-perl.git



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