July 2009 - openSUSE Commits - openSUSE Mailing Lists

commit perl-Devel-Symdump for openSUSE:Factory
by root＠Hilbert.suse.de 27 Jul '09

27 Jul '09

Hello community, here is the log from the commit of package perl-Devel-Symdump for openSUSE:Factory checked in at Mon Jul 27 22:30:15 CEST 2009. -------- --- perl-Devel-Symdump/perl-Devel-Symdump.changes 2006-10-13 15:56:37.000000000 +0200 +++ perl-Devel-Symdump/perl-Devel-Symdump.changes 2009-07-25 19:37:18.000000000 +0200 @@ -1,0 +2,32 @@ +Sat Jul 25 19:37:16 CEST 2009 - chris(a)computersalat.de + +- spec mods + * removed ^---------- + * removed ^#--------- + +------------------------------------------------------------------- +Fri Jun 19 01:09:46 CEST 2009 - chris(a)computersalat.de + +- spec fix for perl-macros + +------------------------------------------------------------------- +Thu Jun 18 02:42:40 CEST 2009 - chris(a)computersalat.de + +- added perl-macros + o autogen filelist with perl_gen_filelist + +------------------------------------------------------------------- +Sun Jun 14 17:30:06 CEST 2009 - chris(a)computersalat.de + +- update to 2.08 + * skip the recurse test on 5.005 +- upate to 2.07 + * rewrite symdump.t using Test::More + * adjust test suite to accept main::- also introduced for named + captures +- spec mods + o updated header + o fixed deps + o autogen filelist + +------------------------------------------------------------------- calling whatdependson for head-i586 Old: ---- Devel-Symdump-2.0604.tar.bz2 New: ---- Devel-Symdump-2.08.tar.gz ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ Other differences: ------------------ ++++++ perl-Devel-Symdump.spec ++++++ --- /var/tmp/diff_new_pack.pyoEUa/_old 2009-07-27 22:29:07.000000000 +0200 +++ /var/tmp/diff_new_pack.pyoEUa/_new 2009-07-27 22:29:07.000000000 +0200 @@ -1,5 +1,5 @@ # -# spec file for package perl-Devel-Symdump (Version 2.0604) +# spec file for package perl-Devel-Symdump (Version 2.08) # # Copyright (c) 2009 SUSE LINUX Products GmbH, Nuernberg, Germany. # @@ -19,52 +19,53 @@ Name: perl-Devel-Symdump -Version: 2.0604 -Release: 116 -Provides: Devel-Symdump -Requires: perl = %{perl_version} -Conflicts: perlmod -AutoReqProv: on +%define mname %( echo %{name} | %{__sed} -e 's,perl-,,' ) +Summary: Dump symbol names or the symbol table +Version: 2.08 +Release: 1 +License: Artistic License .. Group: Development/Libraries/Perl -License: Artistic License Url: http://cpan.org/modules/by-module/Devel/ -Source: Devel-Symdump-%{version}.tar.bz2 -Summary: Inspect Perl's Symbol Table +Source: %{mname}-%{version}.tar.gz BuildRoot: %{_tmppath}/%{name}-%{version}-build +Conflicts: perlmod +BuildRequires: perl +BuildRequires: perl-macros +BuildRequires: perl(Test::More) +BuildRequires: perl(Test::Pod) >= 1.00 +BuildRequires: perl(Test::Pod::Coverage) +Requires: perl = %{perl_version} +Requires: perl(Carp) %description -Devel::Symdump is a Perl module that provides a convenient way to -inspect Perl's symbol table and the class hierarchy within a running -program. - - -Authors: --------- - Andreas K�nig <andreas.koenig(a)anima.de> + %{mname} module for perl +This little package serves to access the symbol table of perl. + Author: Andreas Koenig <andk(a)cpan.org> + Tom Christiansen <tchrist(a)perl.com> + Based on the old dumpvar.pl by Larry Wall. %prep -%setup -q -n Devel-Symdump-%{version} +%setup -q -n %{mname}-%{version} %build -perl Makefile.PL -make all -make test +CFLAGS="$RPM_OPT_FLAGS" perl Makefile.PL +%{__make} + +%check +%{__make} test %install -rm -rf $RPM_BUILD_ROOT -make DESTDIR=$RPM_BUILD_ROOT install_vendor +%perl_make_install %perl_process_packlist +%perl_gen_filelist %clean -rm -rf $RPM_BUILD_ROOT +%{__rm} -rf $RPM_BUILD_ROOT -%files -%defattr(-, root, root) -%doc ChangeLog README -%doc %{_mandir}/man?/* -%{perl_vendorarch}/auto/Devel -%{perl_vendorlib}/Devel -/var/adm/perl-modules/%{name} +%files -f %{name}.files +# normally you only need to check for doc files +%defattr(-,root,root) +%doc ChangeLog SIGNATURE %changelog ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ Remember to have fun... -- To unsubscribe, e-mail: opensuse-commit+unsubscribe(a)opensuse.org For additional commands, e-mail: opensuse-commit+help(a)opensuse.org

1 0

commit perl-Test-Pod for openSUSE:Factory
by root＠Hilbert.suse.de 27 Jul '09

27 Jul '09

Hello community, here is the log from the commit of package perl-Test-Pod for openSUSE:Factory checked in at Mon Jul 27 22:28:42 CEST 2009. -------- --- perl-Test-Pod/perl-Test-Pod.changes 2007-10-17 17:01:10.000000000 +0200 +++ perl-Test-Pod/perl-Test-Pod.changes 2009-07-25 19:44:47.000000000 +0200 @@ -1,0 +2,25 @@ +Sat Jul 25 19:44:45 CEST 2009 - chris(a)computersalat.de + +- spec mods + * removed ^---------- + * removed ^#--------- + +------------------------------------------------------------------- +Fri Jun 19 01:09:50 CEST 2009 - chris(a)computersalat.de + +- spec fix for perl-macros + +------------------------------------------------------------------- +Tue Jun 16 14:58:13 CEST 2009 - chris(a)computersalat.de + +- added perl-macros + o autogen filelist with perl_gen_filelist + +------------------------------------------------------------------- +Sat Jun 13 00:48:58 CEST 2009 - chris(a)computersalat.de + +- some spec mods + o updated header + o autogen filelist + +------------------------------------------------------------------- calling whatdependson for head-i586 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ Other differences: ------------------ ++++++ perl-Test-Pod.spec ++++++ --- /var/tmp/diff_new_pack.TV4Zsa/_old 2009-07-27 22:26:15.000000000 +0200 +++ /var/tmp/diff_new_pack.TV4Zsa/_new 2009-07-27 22:26:15.000000000 +0200 @@ -19,34 +19,44 @@ Name: perl-Test-Pod -License: Artistic License -Group: Development/Libraries/Perl -Url: http://cpan.org/ -BuildRequires: perl-Pod-Escapes perl-Pod-Simple -Requires: perl = %{perl_version} perl-Pod-Simple perl-Pod-Escapes -AutoReqProv: on +%define cpan_name %( echo %{name} | %{__sed} -e 's,perl-,,' ) Summary: Check for POD errors in files Version: 1.26 -Release: 122 -Source: http://cpan.org/modules/by-module/Test/Test-Pod-%{version}.tar.bz2 +Release: 123 +License: Artistic License .. +Group: Development/Libraries/Perl +Url: http://cpan.org/ +Source: http://cpan.org/modules/by-module/Test/%{cpan_name}-%{version}.tar.bz2 BuildRoot: %{_tmppath}/%{name}-%{version}-build +BuildRequires: perl +BuildRequires: perl-macros +#BuildRequires: perl(Module::Build) +BuildRequires: perl(Test::More) >= 0 +BuildRequires: perl(Test::Builder::Tester) >= 0 +# other not perl || perl-base +BuildRequires: perl(Pod::Escapes) >= 1.04 +BuildRequires: perl(Pod::Simple) >= 2.04 +BuildRequires: perl(File::Spec) >= 0 +Requires: perl = %{perl_version} +# other not perl || perl-base +Requires: perl(Pod::Escapes) >= 1.04 +Requires: perl(Pod::Simple) >= 2.04 +Requires: perl(File::Spec) >= 0 +#Provides: %{cpan_name} Test::Pod %description -Test::Pod lets you check the validity of a POD file, and report its -results in standard Test::Simple fashion. - - -Authors: --------- - Andy Lester, <andy at petdance dot com> + %{cpan_name} module for perl + Test::Pod lets you check the validity of a POD file, and report its + results in standard Test::Simple fashion. + Authors: Andy Lester, <andy at petdance dot com> brian d foy, <bdfoy at cpan dot org> %prep -%setup -n Test-Pod-%{version} +%setup -q -n %{cpan_name}-%{version} %build -perl Makefile.PL +CFLAGS="$RPM_OPT_FLAGS" perl Makefile.PL %{__make} %check @@ -55,18 +65,14 @@ %install %perl_make_install %perl_process_packlist +%perl_gen_filelist %clean -[ "${RPM_BUILD_ROOT}" != "/" -a -d ${RPM_BUILD_ROOT} ] && rm -rf ${RPM_BUILD_ROOT} +%{__rm} -rf ${RPM_BUILD_ROOT} -%files -%defattr(-, root, root) -%dir %{perl_vendorlib}/Test -%{perl_vendorlib}/Test/Pod.pm -%dir %{perl_vendorarch}/auto/Test -%dir %{perl_vendorarch}/auto/Test/Pod -%{perl_vendorarch}/auto/Test/Pod/.packlist -%{_mandir}/man3/Test::Pod.3pm.gz -/var/adm/perl-modules/%{name} +%files -f %{name}.files +# normally you only need to check for doc files +%defattr(-,root,root) +%doc Changes %changelog ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ Remember to have fun... -- To unsubscribe, e-mail: opensuse-commit+unsubscribe(a)opensuse.org For additional commands, e-mail: opensuse-commit+help(a)opensuse.org

1 0

commit perl-Test-Base for openSUSE:Factory
by root＠Hilbert.suse.de 27 Jul '09

27 Jul '09

Hello community, here is the log from the commit of package perl-Test-Base for openSUSE:Factory checked in at Mon Jul 27 22:25:58 CEST 2009. -------- --- perl-Test-Base/perl-Test-Base.changes 2007-08-07 01:30:38.000000000 +0200 +++ perl-Test-Base/perl-Test-Base.changes 2009-07-25 19:42:39.000000000 +0200 @@ -1,0 +2,26 @@ +Sat Jul 25 19:42:36 CEST 2009 - chris(a)computersalat.de + +- spec mods + * removed ^---------- + * removed ^#--------- + +------------------------------------------------------------------- +Sat Jun 20 20:21:43 CEST 2009 - chris(a)computersalat.de + +- update to 0.58 + o Another undef filtering change. +- version: 0.57 + o Allow value of undef to be filtered without warnings. +- version: 0.56 + o Add Test::Deep support with is_deep and run_is_deep +- version: 0.55 + o Module::Install::TestBase::use_test_base require 'Filter::Util::Call' now. +- added perl-macros + o autogen filelist with perl_gen_filelist +- spec mods + o added header + o fixed deps +- added req patch + o needs Test/Deep + +------------------------------------------------------------------- calling whatdependson for head-i586 Old: ---- Test-Base-0.54.tar.gz New: ---- Test-Base-0.58-req.patch Test-Base-0.58.tar.bz2 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ Other differences: ------------------ ++++++ perl-Test-Base.spec ++++++ --- /var/tmp/diff_new_pack.FkHHwm/_old 2009-07-27 22:24:25.000000000 +0200 +++ /var/tmp/diff_new_pack.FkHHwm/_new 2009-07-27 22:24:25.000000000 +0200 @@ -1,5 +1,5 @@ # -# spec file for package perl-Test-Base (Version 0.54) +# spec file for package perl-Test-Base (Version 0.58) # # Copyright (c) 2009 SUSE LINUX Products GmbH, Nuernberg, Germany. # @@ -19,63 +19,58 @@ Name: perl-Test-Base -BuildRequires: perl-Spiffy >= 0.3 -Url: http://search.cpan.org/~ingy/Test-Base -License: Artistic License +%define cpan_name %( echo %{name} | %{__sed} -e 's,perl-,,' ) +Summary: A Data Driven Testing Framework +Version: 0.58 +Release: 1 +License: Artistic License .. Group: Development/Libraries/Perl -Requires: perl = %{perl_version} perl-Spiffy >= 0.3 -AutoReqProv: on -Summary: Perl module for easily writing own test framework base classes. -Version: 0.54 -Release: 73 -Source: Test-Base-%{version}.tar.gz +Url: http://search.cpan.org/~ingy/Test-Base +Source: %{cpan_name}-%{version}.tar.bz2 +Patch: %{cpan_name}-0.58-req.patch BuildRoot: %{_tmppath}/%{name}-%{version}-build +BuildRequires: perl +BuildRequires: perl-macros +BuildRequires: perl(Test::More) >= 0.62 +BuildRequires: perl(Test::Deep) +BuildRequires: perl(Spiffy) >= 0.3 +BuildRequires: perl(YAML) +Requires: perl = %{perl_version} +Requires: perl(LWP::Simple) +Requires: perl(Test::Deep) +Requires: perl(Spiffy) >= 0.3 +Requires: perl(YAML) %description -This module gives you a way to write your own test framework base class -that is trivial. In fact it is as simple as two lines. It extends -Test::More and exports all of its functions - - -Authors: --------- - Brian Ingerson <INGY(a)cpan.org> + %{cpan_name} module for perl + This module gives you a way to write your own test framework base class + that is trivial. In fact it is as simple as two lines. It extends + Test::More and exports all of its functions + Author: Brian Ingerson <INGY(a)cpan.org> %prep -%setup -n Test-Base-%{version} +%setup -q -n %{cpan_name}-%{version} +%patch -p1 %build -perl Makefile.PL -make +CFLAGS="$RPM_OPT_FLAGS" perl Makefile.PL +%{__make} %check -make test +%{__make} test %install -rm -rf $RPM_BUILD_ROOT -make DESTDIR=$RPM_BUILD_ROOT install_vendor +%perl_make_install %perl_process_packlist +%perl_gen_filelist %clean -rm -rf $RPM_BUILD_ROOT +%{__rm} -rf $RPM_BUILD_ROOT -%files +%files -f %{name}.files +# normally you only need to check for doc files %defattr(-,root,root) -%doc README Changes -%dir %{perl_vendorlib}/Test -%dir %{perl_vendorlib}/Test/Base -%dir %{perl_vendorarch}/auto/Test -%dir %{perl_vendorarch}/auto/Test/Base -%doc %{_mandir}/man3/Test::Base.3pm.gz -%doc %{_mandir}/man3/Test::Base::Filter.3pm.gz -%doc %{_mandir}/man3/Module::Install::TestBase.3pm.gz -%{perl_vendorlib}/Test/Base.pm -%{perl_vendorlib}/Test/Base/Filter.pm -%dir %{perl_vendorlib}/Module -%dir %{perl_vendorlib}/Module/Install -%{perl_vendorlib}/Module/Install/TestBase.pm -%{perl_vendorarch}/auto/Test/Base/.packlist -/var/adm/perl-modules/%{name} +%doc Changes README %changelog ++++++ Test-Base-0.58-req.patch ++++++ diff -ruN Test-Base-0.58-orig/Makefile.PL Test-Base-0.58/Makefile.PL --- Test-Base-0.58-orig/Makefile.PL 2009-03-07 20:22:35.000000000 +0000 +++ Test-Base-0.58/Makefile.PL 2009-06-20 22:40:45.046098418 +0000 @@ -7,6 +7,7 @@ requires Spiffy => '0.30'; requires Test::More => '0.62'; requires Filter::Util::Call => '0'; +requires Test::Deep => '0.100'; recommends 'Test::Deep'; ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ Remember to have fun... -- To unsubscribe, e-mail: opensuse-commit+unsubscribe(a)opensuse.org For additional commands, e-mail: opensuse-commit+help(a)opensuse.org

1 0

commit chmlib for openSUSE:Factory
by root＠Hilbert.suse.de 27 Jul '09

27 Jul '09

Hello community, here is the log from the commit of package chmlib for openSUSE:Factory checked in at Mon Jul 27 22:24:10 CEST 2009. -------- --- chmlib/chmlib.changes 2009-05-24 14:21:50.000000000 +0200 +++ chmlib/chmlib.changes 2009-07-25 18:40:14.000000000 +0200 @@ -1,0 +2,5 @@ +Sat Jul 25 18:33:55 CEST 2009 - beineri(a)opensuse.org + +- build examples to an -examples sub-package (bnc#488307) + +------------------------------------------------------------------- calling whatdependson for head-i586 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ Other differences: ------------------ ++++++ chmlib.spec ++++++ --- /var/tmp/diff_new_pack.XGwMmd/_old 2009-07-27 22:22:46.000000000 +0200 +++ /var/tmp/diff_new_pack.XGwMmd/_new 2009-07-27 22:22:46.000000000 +0200 @@ -24,7 +24,7 @@ Group: System/Libraries AutoReqProv: on Version: 0.40 -Release: 1 +Release: 2 Source0: %{name}-%{version}.tar.bz2 Patch: %{name}-0.39.diff Url: http://www.jedrea.com/chmlib/ @@ -57,6 +57,22 @@ -------- Jed Wing <jedwin(a)ugcs.caltech.edu> +%package examples +License: LGPL v2.1 or later +Summary: Example applications for chmlib +Group: System/Libraries +Requires: %{name} = %{version} + +%description examples +This package contains examples built on chmlib which may be useful +to convert chm files from command line. + + + +Authors: +-------- + Jed Wing <jedwin(a)ugcs.caltech.edu> + %prep %setup -q %patch @@ -65,7 +81,7 @@ export CFLAGS="$RPM_OPT_FLAGS -fstack-protector" export CXXFLAGS="$CFLAGS" export CXXCPP="g++ -E" -%configure --disable-static --with-pic --disable-pread +%configure --disable-static --with-pic --disable-pread --enable-examples %{__make} %{?jobs:-j%jobs} %install @@ -90,4 +106,8 @@ %{_includedir}/lzx.h %{_libdir}/*.so +%files examples +%defattr(-, root, root) +%{_bindir}/* + %changelog ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ Remember to have fun... -- To unsubscribe, e-mail: opensuse-commit+unsubscribe(a)opensuse.org For additional commands, e-mail: opensuse-commit+help(a)opensuse.org

1 0

commit yast2-bootloader for openSUSE:Factory
by root＠Hilbert.suse.de 27 Jul '09

27 Jul '09

Hello community, here is the log from the commit of package yast2-bootloader for openSUSE:Factory checked in at Mon Jul 27 22:22:29 CEST 2009. -------- --- yast2-bootloader/yast2-bootloader.changes 2009-07-24 17:06:34.000000000 +0200 +++ yast2-bootloader/yast2-bootloader.changes 2009-07-27 16:53:01.000000000 +0200 @@ -1,0 +2,6 @@ +Mon Jul 27 15:48:32 CEST 2009 - juhliarik(a)suse.cz + +- added support for enable/disable acoustinc signals (fate#305403) +- 2.18.11 + +------------------------------------------------------------------- calling whatdependson for head-i586 Old: ---- yast2-bootloader-2.18.10.tar.bz2 New: ---- yast2-bootloader-2.18.11.tar.bz2 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ Other differences: ------------------ ++++++ yast2-bootloader.spec ++++++ --- /var/tmp/diff_new_pack.sSWINF/_old 2009-07-27 22:21:08.000000000 +0200 +++ /var/tmp/diff_new_pack.sSWINF/_new 2009-07-27 22:21:08.000000000 +0200 @@ -1,5 +1,5 @@ # -# spec file for package yast2-bootloader (Version 2.18.10) +# spec file for package yast2-bootloader (Version 2.18.11) # # Copyright (c) 2009 SUSE LINUX Products GmbH, Nuernberg, Germany. # @@ -19,10 +19,10 @@ Name: yast2-bootloader -Version: 2.18.10 +Version: 2.18.11 Release: 1 BuildRoot: %{_tmppath}/%{name}-%{version}-build -Source0: yast2-bootloader-2.18.10.tar.bz2 +Source0: yast2-bootloader-2.18.11.tar.bz2 Prefix: /usr Group: System/YaST License: GPL v2 or later @@ -61,7 +61,7 @@ This package contains the YaST2 component for bootloader configuration. %prep -%setup -n yast2-bootloader-2.18.10 +%setup -n yast2-bootloader-2.18.11 %build %{prefix}/bin/y2tool y2autoconf ++++++ yast2-bootloader-2.18.10.tar.bz2 -> yast2-bootloader-2.18.11.tar.bz2 ++++++ diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/yast2-bootloader-2.18.10/VERSION new/yast2-bootloader-2.18.11/VERSION --- old/yast2-bootloader-2.18.10/VERSION 2009-07-24 14:55:00.000000000 +0200 +++ new/yast2-bootloader-2.18.11/VERSION 2009-07-27 15:49:29.000000000 +0200 @@ -1 +1 @@ -2.18.10 +2.18.11 diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/yast2-bootloader-2.18.10/src/grub/helps.ycp new/yast2-bootloader-2.18.11/src/grub/helps.ycp --- old/yast2-bootloader-2.18.10/src/grub/helps.ycp 2009-06-23 10:46:19.000000000 +0200 +++ new/yast2-bootloader-2.18.11/src/grub/helps.ycp 2009-07-27 15:38:08.000000000 +0200 @@ -78,6 +78,8 @@ _("Selecting Hide Menu on Boot will hide the boot menu."), "gfxmenu" : _("Graphical Menu File defines the file to use for the graphical boot menu."), + "enable_acoustic_signals" : + _("Enable Acoustic Signals turn on/off acoustic signals."), "password" : _("Protect Boot Loader with Password Define the password that will be required to access the boot menu. YaST will only accept the password if you repeat diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/yast2-bootloader-2.18.10/src/grub/options.ycp new/yast2-bootloader-2.18.11/src/grub/options.ycp --- old/yast2-bootloader-2.18.10/src/grub/options.ycp 2009-07-20 11:47:28.000000000 +0200 +++ new/yast2-bootloader-2.18.11/src/grub/options.ycp 2009-07-27 15:36:25.000000000 +0200 @@ -20,6 +20,7 @@ import "Label"; import "BootStorage"; +import "GfxMenu"; import "System::Bootloader_API"; include "bootloader/routines/common_options.ycp"; @@ -31,6 +32,10 @@ boolean value = BootCommon::globals["trusted_grub"]:"false" != "true"; UI::ChangeWidget(`id(`gfxinput),`Enabled, value); UI::ChangeWidget(`id(`gfxinput),`Value,BootCommon::globals[widget]:""); + if (GfxMenu::enable_sound_signals) + UI::ChangeWidget(`id(`enable_acoustic_signals),`Value, true); + else + UI::ChangeWidget(`id(`enable_acoustic_signals),`Value, false); } void StoreGfx(string widget, map event){ @@ -40,6 +45,8 @@ } else { BootCommon::global_options[widget] = result; } + + GfxMenu::enable_sound_signals = (boolean) UI::QueryWidget(`id(`enable_acoustic_signals),`Value); } symbol HandleGfx(string widget, map event){ @@ -56,18 +63,21 @@ map<string,any> GfxWidget(){ return $[ "widget" : `custom, - "custom_widget" : `HBox(`Left(`InputField(`id(`gfxinput),`opt(`hstretch), - grub_descriptions["gfxmenu"]:"gfxmenu")), - `VBox( - `Left(`Label("")), - `Left(`PushButton(`id(`browsegfx),`opt(`notify), Label::BrowseButton())) - ) - ), + "custom_widget" : + `VBox( + `Left(`CheckBox(`id(`enable_acoustic_signals), _("Enable Acoustic &Signals"))), + `HBox(`Left(`InputField(`id(`gfxinput),`opt(`hstretch), grub_descriptions["gfxmenu"]:"gfxmenu")), + `VBox( + `Left(`Label("")), + `Left(`PushButton(`id(`browsegfx),`opt(`notify), Label::BrowseButton())) + ) + ) + ), "init" : InitGfx, "store" : StoreGfx, "handle" : HandleGfx, "handle_events" : [`browsegfx], - "help" : grub_help_messages["gfxmenu"]:"" + "help" : grub_help_messages["gfxmenu"]:"" + grub_help_messages["enable_acoustic_signals"]:"" ]; } diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/yast2-bootloader-2.18.10/src/modules/BootCommon.ycp new/yast2-bootloader-2.18.11/src/modules/BootCommon.ycp --- old/yast2-bootloader-2.18.10/src/modules/BootCommon.ycp 2009-07-24 15:21:35.000000000 +0200 +++ new/yast2-bootloader-2.18.11/src/modules/BootCommon.ycp 2009-07-24 17:05:52.000000000 +0200 @@ -15,7 +15,7 @@ * Joachim Plack <jplack(a)suse.de> * Olaf Dabrunz <od(a)suse.de> * - * $Id: BootCommon.ycp 57267 2009-05-20 12:35:05Z juhliarik $ + * $Id: BootCommon.ycp 58153 2009-07-24 15:05:51Z juhliarik $ * */ diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/yast2-bootloader-2.18.10/src/modules/BootGRUB.ycp new/yast2-bootloader-2.18.11/src/modules/BootGRUB.ycp --- old/yast2-bootloader-2.18.10/src/modules/BootGRUB.ycp 2009-07-22 13:39:48.000000000 +0200 +++ new/yast2-bootloader-2.18.11/src/modules/BootGRUB.ycp 2009-07-27 15:16:37.000000000 +0200 @@ -504,8 +504,10 @@ { BootStorage::ProposeDeviceMap (); } - - //importMetaData(); + // FATE#305403: Bootloader beep configuration + // read status of acoustic signals + if (Mode::normal()) + GfxMenu::ReadStatusAcousticSignal(); return ret; } diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/yast2-bootloader-2.18.10/src/modules/Bootloader.ycp new/yast2-bootloader-2.18.11/src/modules/Bootloader.ycp --- old/yast2-bootloader-2.18.10/src/modules/Bootloader.ycp 2009-07-24 15:25:27.000000000 +0200 +++ new/yast2-bootloader-2.18.11/src/modules/Bootloader.ycp 2009-07-24 17:05:52.000000000 +0200 @@ -12,7 +12,7 @@ * Jiri Srain <jsrain(a)suse.cz> * Olaf Dabrunz <od(a)suse.de> * - * $Id: Bootloader.ycp 56960 2009-04-24 09:42:22Z juhliarik $ + * $Id: Bootloader.ycp 58153 2009-07-24 15:05:51Z juhliarik $ * */ diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/yast2-bootloader-2.18.10/src/modules/GfxMenu.ycp new/yast2-bootloader-2.18.11/src/modules/GfxMenu.ycp --- old/yast2-bootloader-2.18.10/src/modules/GfxMenu.ycp 2009-06-26 11:18:15.000000000 +0200 +++ new/yast2-bootloader-2.18.11/src/modules/GfxMenu.ycp 2009-07-27 15:29:32.000000000 +0200 @@ -23,6 +23,11 @@ import "Mode"; + /** FATE#305403: Bootloader beep configuration + * enable/disable sounds signal during boot + */ + global boolean enable_sound_signals = false; + /** * Replace every match of given regular expression in a string with a * replacement string @@ -284,6 +289,60 @@ return ret; } +/** FATE#305403: Bootloader beep configuration + * Read status of acoustic signals + * set global variable enable_sound_signals + * + */ + +global void ReadStatusAcousticSignal () +{ + integer ret = -1; // off + + string command = "gfxboot --show-config | grep beep="; + map out = (map)SCR::Execute (.target.bash_output, command); + + y2milestone("Comand: %1 return: %2",command, out); + if (out["exit"]:-1 == 0) + { + string result = out["stdout"]:""; + list <string> l_result = splitstring(result, "\n"); + if (l_result[1]:"" == "beep=1") + ret = 1; + else + ret = 0; + + } else { + y2error("Calling command: %1 failed", command); + } + if (ret == 1) + enable_sound_signals = true; + else + enable_sound_signals = false; + + y2milestone("Status of acoustic signals is (on==true/off==false): %1", enable_sound_signals); +} + + +/** FATE#305403: Bootloader beep configuration + * Write settings for acoustic signals + * + * @param boolean true -> enable acoustic signals or disable + */ +void WriteAcousticSignal(boolean enable) +{ + string command = "gfxboot --change-config boot::beep=0"; + if (enable) + { + y2milestone("Enable acoustic signals for boot menu"); + command = "gfxboot --change-config boot::beep=1"; + } else { + y2milestone("Disable acoustic signals for boot menu"); + } + map ret = (map)SCR::Execute (.target.bash_output, command); + y2milestone ("Result of command: %1 result: %2",command, ret); +} + /** * Update graphical bootloader to contain translations for section labels in @@ -296,6 +355,8 @@ global define boolean UpdateGfxMenuContents (string loader) { y2milestone ("Updating GFX boot menu"); + // FATE#305403: Bootloader beep configuration + WriteAcousticSignal(enable_sound_signals); // if the boot menu does not exist, return without updating it if (SCR::Read (.target.size, "/boot/message") == -1) return true; diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/yast2-bootloader-2.18.10/src/routines/misc.ycp new/yast2-bootloader-2.18.11/src/routines/misc.ycp --- old/yast2-bootloader-2.18.10/src/routines/misc.ycp 2009-07-24 15:25:17.000000000 +0200 +++ new/yast2-bootloader-2.18.11/src/routines/misc.ycp 2009-07-24 17:05:52.000000000 +0200 @@ -12,7 +12,7 @@ * Jiri Srain <jsrain(a)suse.cz> * Olaf Dabrunz <od(a)suse.de> * - * $Id: misc.ycp 57010 2009-04-28 14:39:07Z juhliarik $ + * $Id: misc.ycp 58153 2009-07-24 15:05:51Z juhliarik $ * * WARNING: * To be included to BootCommon.ycp only, requires function @@ -1733,6 +1733,7 @@ }); new_append = mergestring(list_new_append, " "); } + add_luks_to_initrd = false; return new_append; } ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ Remember to have fun... -- To unsubscribe, e-mail: opensuse-commit+unsubscribe(a)opensuse.org For additional commands, e-mail: opensuse-commit+help(a)opensuse.org

1 0

commit libgadu for openSUSE:Factory
by root＠Hilbert.suse.de 27 Jul '09

27 Jul '09

Hello community, here is the log from the commit of package libgadu for openSUSE:Factory checked in at Mon Jul 27 22:20:35 CEST 2009. -------- --- libgadu/libgadu.changes 2008-10-29 14:49:07.000000000 +0100 +++ libgadu/libgadu.changes 2009-07-27 16:03:35.000000000 +0200 @@ -1,0 +2,5 @@ +Mon Jul 27 15:54:18 CEST 2009 - sbrabec(a)suse.cz + +- Build with threads support (bnc#525312) and SSL support. + +------------------------------------------------------------------- calling whatdependson for head-i586 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ Other differences: ------------------ ++++++ libgadu.spec ++++++ --- /var/tmp/diff_new_pack.KaDuts/_old 2009-07-27 22:13:46.000000000 +0200 +++ /var/tmp/diff_new_pack.KaDuts/_new 2009-07-27 22:13:46.000000000 +0200 @@ -1,7 +1,7 @@ # # spec file for package libgadu (Version 1.8.2) # -# Copyright (c) 2008 SUSE LINUX Products GmbH, Nuernberg, Germany. +# Copyright (c) 2009 SUSE LINUX Products GmbH, Nuernberg, Germany. # # All modifications and additions to the file contributed by third parties # remain the property of their copyright owners, unless otherwise agreed @@ -21,11 +21,12 @@ Name: libgadu Summary: Library for Handling of Gadu-Gadu Instant Messaging Version: 1.8.2 -Release: 1 +Release: 2 License: LGPL v2.1 or later Group: System/Libraries Url: http://toxygen.net/libgadu/ Source: %{name}-%{version}.tar.bz2 +BuildRequires: openssl-devel pkg-config BuildRoot: %{_tmppath}/%{name}-%{version}-build %description @@ -58,7 +59,10 @@ %setup -q %build -%configure --disable-static --with-pic +autoreconf -f -i +%configure\ + --disable-static\ + --with-pthread make %{?jobs:-j%jobs} %install ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ Remember to have fun... -- To unsubscribe, e-mail: opensuse-commit+unsubscribe(a)opensuse.org For additional commands, e-mail: opensuse-commit+help(a)opensuse.org

1 0

commit perl-DBI for openSUSE:Factory
by root＠Hilbert.suse.de 27 Jul '09

27 Jul '09

Hello community, here is the log from the commit of package perl-DBI for openSUSE:Factory checked in at Mon Jul 27 22:13:16 CEST 2009. -------- --- perl-DBI/perl-DBI.changes 2009-05-18 17:57:09.000000000 +0200 +++ perl-DBI/perl-DBI.changes 2009-07-25 19:37:02.000000000 +0200 @@ -1,0 +2,37 @@ +Sat Jul 25 19:37:00 CEST 2009 - chris(a)computersalat.de + +- spec mods + * removed ^---------- + * removed ^#--------- + +------------------------------------------------------------------- +Fri Jun 19 01:09:45 CEST 2009 - chris(a)computersalat.de + +- spec fix for perl-macros + +------------------------------------------------------------------- +Thu Jun 18 02:28:09 CEST 2009 - chris(a)computersalat.de + +- added perl-macros + o autogen filelist with perl_gen_filelist + +------------------------------------------------------------------- +Mon Jun 15 02:12:22 CEST 2009 - chris(a)computersalat.de + +- update to 1.609 + * Fixes to DBD::File (H.Merijn Brand) + added f_schema attribute + table names case sensitive when quoted, insensitive when unquoted + workaround a bug in SQL::Statement (temporary fix) related + to the "You passed x parameters where y required" error + * Added ImplementorClass and Name info to the "Issuing rollback() due to + DESTROY without explicit disconnect" warning to identify the handle. + Applies to compiled drivers when they are recompiled. + * Added DBI->visit_handles($coderef) method. + * Added $h->visit_child_handles($coderef) method. + * Added docs for column_info()'s COLUMN_DEF value. + * Clarified docs on stickyness of data type via bind_param(). + * Clarified docs on stickyness of data type via bind_col(). +- some spec mods + +------------------------------------------------------------------- calling whatdependson for head-i586 Old: ---- DBI-1.608.tar.bz2 New: ---- DBI-1.609.tar.bz2 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ Other differences: ------------------ ++++++ perl-DBI.spec ++++++ --- /var/tmp/diff_new_pack.nbczl2/_old 2009-07-27 22:07:21.000000000 +0200 +++ /var/tmp/diff_new_pack.nbczl2/_new 2009-07-27 22:07:21.000000000 +0200 @@ -1,5 +1,5 @@ # -# spec file for package perl-DBI (Version 1.608) +# spec file for package perl-DBI (Version 1.609) # # Copyright (c) 2009 SUSE LINUX Products GmbH, Nuernberg, Germany. # @@ -17,64 +17,72 @@ # norootforbuild +%define pren perl +%define cpan_name DBI +%define ver 1.609 +%if %{?rel:0}%{!?rel:1} +%define rel 1 +%endif +#Distribution: %dist +#Packager: %packager +#Vendor: %vendor Name: perl-DBI -BuildRequires: perl-Curses -Version: 1.608 +%define cpan_name %( echo %{name} | %{__sed} -e 's,perl-,,' ) +Summary: The Perl Database Interface +Version: 1.609 Release: 1 -Requires: perl = %{perl_version} -Requires: perl-PlRPC -Provides: perl_dbi DBI -Obsoletes: perl_dbi AutoReqProv: on -Group: Development/Libraries/Perl License: GPL v2 or later +Group: Development/Libraries/Perl Url: http://cpan.org/modules/by-module/DBI/ -Summary: The Perl Database Interface -Source: DBI-%{version}.tar.bz2 +Source: %{cpan_name}-%{version}.tar.bz2 BuildRoot: %{_tmppath}/%{name}-%{version}-build +BuildRequires: perl +BuildRequires: perl-macros +BuildRequires: perl(Test::Simple) >= 0.40 +BuildRequires: perl(Test::Pod) >= 1.00 +BuildRequires: perl(Test::Pod::Coverage) >= 1.04 +BuildRequires: perl(Storable) >= 1 +BuildRequires: perl(File::Spec) +BuildRequires: perl(Scalar::Util) +#BuildRequires: perl(Curses) +Requires: perl = %{perl_version} +Requires: perl(Storable) >= 1 +Requires: perl(File::Spec) +Requires: perl(Scalar::Util) +Requires: perl-PlRPC +Obsoletes: perl_dbi +Provides: perl_dbi DBI DBDI %description The Perl Database Interface by Tim Bunce. - - -Authors: --------- + Authors: Tim Bunce <Tim.Bunce(a)pobox.com> <dbi-users(a)isc.org> + %prep -%setup -q -n DBI-%{version} +%setup -q -n %{cpan_name}-%{version} %build perl Makefile.PL OPTIMIZE="$RPM_OPT_FLAGS -Wall" -make +%{__make} %check -make test +%{__make} test %install %perl_make_install %perl_process_packlist +%perl_gen_filelist %clean -rm -rf $RPM_BUILD_ROOT +%{__rm} -rf $RPM_BUILD_ROOT -%files +%files -f %{name}.files %defattr(-,root,root) %doc Changes README -%doc %{_mandir}/man?/* -%{perl_vendorarch}/Bundle -%{perl_vendorarch}/DBD -%{perl_vendorarch}/DBI -%{perl_vendorarch}/DBI.pm -%{perl_vendorarch}/Roadmap.pod -%{perl_vendorarch}/Win32 -%{perl_vendorarch}/auto/DBI -%{perl_vendorarch}/TASKS.pod -%{perl_vendorarch}/dbixs_rev.pl -%{_bindir}/* -/var/adm/perl-modules/%{name} %changelog ++++++ DBI-1.608.tar.bz2 -> DBI-1.609.tar.bz2 ++++++ diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/DBI-1.608/Changes new/DBI-1.609/Changes --- old/DBI-1.608/Changes 2009-05-05 13:11:04.000000000 +0200 +++ new/DBI-1.609/Changes 2009-06-08 12:07:26.000000000 +0200 @@ -2,57 +2,26 @@ DBI::Changes - List of significant changes to the DBI -(As of $Date: 2009-05-05 12:10:59 +0100 (Tue, 05 May 2009) $ $Revision: 12742 $) +(As of $Date: 2009-06-08 11:07:26 +0100 (Mon, 08 Jun 2009) $ $Revision: 12816 $) =cut -Assorted TODO notes: +=head2 Changes in DBI 1.609 (svn r12816) 8th June 2009 -General: - Protect trace_msg from SIGPIPE? - prepare(...,{ Err=>\my $isolated_err, ...}) - Add trace modules that just records the last N trace messages into an array - and prepends them to any error message. - Document DBI_PROFILE_FLOCK and LockFile attrib in DBI::ProfileData and DBI::ProfileDumper -Performance: - Move _new_sth to DBI::db::_new_sth (leave alias) and implement in C - Or call _new_child and move to DBI::common? - Implement FETCH_many() in C - -Gofer TODOs: - -Add server-side caching. - combine these: - my $request = $transport->thaw_request( $frozen_request, $serializer ); - my $response = $executor->execute_request( $request ); - my $frozen_response = $transport->freeze_response($response, $serializer); - into single method that first checks the cache and updates it if appropriate. - Different serializations will have different caches - -Add DBI::Gofer::Serialiser::MIME / Base64 -Add DBI::Gofer::Serialiser::JSON - -Gofer - allow dbh attrib changes after connect? - note them and pass in request as STORE method calls - but then gofer server need to reset them to restore dbh to original state - Or, change the attr in the connect() call, but that risks - bloating the number of cache dbh in the server. -Gofer request flags for: - - return current executor stats as an attribute - handy for tests - - will accept streamed resultsets -Add attr-passthru to prepare()? ie for gofer cache control & ReadOnly -Define and document terminology for client and server ends -Document user/passwd issues at the various levels of the gofer stack - Remove "Password" from connect attr if the same as $password arg -Extract policy settings by parsing the pod -Policy for dbh attr FETCH (ie example_driver_path) - or piggyback on skip_connect_check - could also remember which attr have been returned to us - so not bother FETCHing them (unless pedantic) -Call method on transport failure so transport can cleanup/reset if it wants -Gofer: gearman - need to disable coallesing for non-idempotent requests - -Add high-res time for windows - via Time::HiRes glob replace dbi_time(). + Fixes to DBD::File (H.Merijn Brand) + added f_schema attribute + table names case sensitive when quoted, insensitive when unquoted + workaround a bug in SQL::Statement (temporary fix) related + to the "You passed x parameters where y required" error + + Added ImplementorClass and Name info to the "Issuing rollback() due to + DESTROY without explicit disconnect" warning to identify the handle. + Applies to compiled drivers when they are recompiled. + Added DBI->visit_handles($coderef) method. + Added $h->visit_child_handles($coderef) method. + Added docs for column_info()'s COLUMN_DEF value. + Clarified docs on stickyness of data type via bind_param(). + Clarified docs on stickyness of data type via bind_col(). =head2 Changes in DBI 1.608 (svn r12742) 5th May 2009 diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/DBI-1.608/DBI.pm new/DBI-1.609/DBI.pm --- old/DBI-1.608/DBI.pm 2009-05-05 13:11:04.000000000 +0200 +++ new/DBI-1.609/DBI.pm 2009-06-06 00:34:49.000000000 +0200 @@ -1,7 +1,7 @@ -# $Id: DBI.pm 12742 2009-05-05 11:10:59Z timbo $ +# $Id: DBI.pm 12812 2009-06-05 22:34:47Z timbo $ # vim: ts=8:sw=4:noet # -# Copyright (c) 1994-2008 Tim Bunce Ireland +# Copyright (c) 1994-2009 Tim Bunce Ireland # # See COPYRIGHT section in pod text below for usage and distribution rights. # @@ -9,7 +9,7 @@ require 5.006_00; BEGIN { -$DBI::VERSION = "1.608"; # ==> ALSO update the version in the pod text below! +$DBI::VERSION = "1.609"; # ==> ALSO update the version in the pod text below! } =head1 NAME @@ -121,8 +121,8 @@ =head2 NOTES -This is the DBI specification that corresponds to the DBI version 1.608 -($Revision: 12742 $). +This is the DBI specification that corresponds to the DBI version 1.609 +($Revision: 12812 $). The DBI is evolving at a steady pace, so it's good to check that you have the latest copy. @@ -399,6 +399,7 @@ trace_msg => { U =>[2,3,'$message_text [, $min_level ]' ], O=>0x0004, T=>8 }, swap_inner_handle => { U =>[2,3,'$h [, $allow_reparent ]'] }, private_attribute_info => { }, + visit_child_handles => { U => [2,3,'$coderef [, $info ]'], O=>0x0404, T=>4 }, }, dr => { # Database Driver Interface 'connect' => { U =>[1,5,'[$db [,$user [,$passwd [,\%attr]]]]'], H=>3, O=>0x8000 }, @@ -534,6 +535,18 @@ return ($scheme, $driver, $attr, $attr_hash, $dsn); } +sub visit_handles { + my ($class, $code, $outer_info) = @_; + $outer_info = {} if not defined $outer_info; + my %drh = DBI->installed_drivers; + for my $h (values %drh) { + my $child_info = $code->($h, $outer_info) + or next; + $h->visit_child_handles($code, $child_info); + } + return $outer_info; +} + # --- The DBI->connect Front Door methods @@ -1399,6 +1412,17 @@ return undef; } + sub visit_child_handles { + my ($h, $code, $info) = @_; + $info = {} if not defined $info; + for my $ch (@{ $h->{ChildHandles} || []}) { + next unless $ch; + my $child_info = $code->($ch, $info) + or next; + $ch->visit_child_handles($code, $child_info); + } + return $info; + } } @@ -2860,6 +2884,31 @@ tracing facilities. +=head3 C<visit_handles> + + DBI->visit_handles( $coderef ); + DBI->visit_handles( $coderef, $info ); + +Where $coderef is a reference to a subroutine and $info is an arbitrary value +which, if undefined, defaults to a reference to an empty hash. Returns $info. + +For each installed driver handle, if any, $coderef is invoked as: + + $coderef->($driver_handle, $info); + +If the execution of $coderef returns a true value then L</visit_child_handles> +is called on that child handle and passed the returned value as $info. + +For example: + + my $info = $dbh->{Driver}->visit_child_handles(sub { + my ($h, $info) = @_; + ++$info->{ $h->{Type} }; # count types of handles (dr/db/st) + return $info; # visit kids + }); + +See also L</visit_child_handles>. + =head2 DBI Utility Functions @@ -3327,6 +3376,32 @@ dbh1o -> dbh2i sthAo -> sthBi(dbh2i) +=head3 C<visit_child_handles> + + $h->visit_child_handles( $coderef ); + $h->visit_child_handles( $coderef, $info ); + +Where $coderef is a reference to a subroutine and $info is an arbitrary value +which, if undefined, defaults to a reference to an empty hash. Returns $info. + +For each child handle of $h, if any, $coderef is invoked as: + + $coderef->($child_handle, $info); + +If the execution of $coderef returns a true value then C<visit_child_handles> +is called on that child handle and passed the returned value as $info. + +For example: + + # count database connections with names (DSN) matching a pattern + my $connections = 0; + $dbh->{Driver}->visit_child_handles(sub { + my ($h, $info) = @_; + ++$connections if $h->{Name} =~ /foo/; + return 0; # don't visit kids + }) + +See also L</visit_handles>. =head1 ATTRIBUTES COMMON TO ALL HANDLES @@ -4611,7 +4686,23 @@ B<REMARKS>: A description of the column. -B<COLUMN_DEF>: The default value of the column. +B<COLUMN_DEF>: The default value of the column, in a format that can be used +directly in an SQL statement. + +Note that this may be an expression and not simply the text used for the +default value in the original CREATE TABLE statement. For example, given: + + col1 char(30) default current_user -- a 'function' + col2 char(30) default 'string' -- a string literal + +where "current_user" is the name of a function, the corresponding C<COLUMN_DEF> +values would be: + + Database col1 col2 + -------- ---- ---- + Oracle: current_user 'string' + Postgres: "current_user"() 'string'::text + MS SQL: (user_name()) ('string') B<SQL_DATA_TYPE>: The SQL data type. @@ -5474,11 +5565,10 @@ See L</"DBI Constants"> for more information. -The data type for a placeholder cannot be changed after the first -C<bind_param> call. In fact the whole \%attr parameter is 'sticky' -in the sense that a driver only needs to consider the \%attr parameter -for the first call, for a given $sth and parameter. After that the driver -may ignore the \%attr parameter for that placeholder. +The data type is 'sticky' in that bind values passed to execute() are bound +with the data type specified by earlier bind_param() calls, if any. +Portable applications should not rely on being able to change the data type +after the first C<bind_param> call. Perl only has string and number scalar data types. All database types that aren't numbers are bound as strings and must be in a format the @@ -6133,7 +6223,7 @@ native formatting the database would normally use. There's no $var_to_bind in that example to emphasize the point -that bind_col() works on the underlying column value and not just +that bind_col() works on the underlying column and not just a particular bound variable. As a short-cut for the common case, the data type can be passed @@ -6152,10 +6242,9 @@ See L</"DBI Constants"> for more information. -The data type for a bind variable cannot be changed after the first -C<bind_col> call. In fact the whole \%attr parameter is 'sticky' -in the sense that a driver only needs to consider the \%attr parameter -for the first call for a given $sth and column. +Few drivers support specifying a data type via a C<bind_col> call (most will +simply ignore the data type). Fewer still allow the data type to be altered +once set. The TYPE attribute for bind_col() was first specified in DBI 1.41. @@ -7543,11 +7632,11 @@ =head1 COPYRIGHT -The DBI module is Copyright (c) 1994-2008 Tim Bunce. Ireland. +The DBI module is Copyright (c) 1994-2009 Tim Bunce. Ireland. All rights reserved. You may distribute under the terms of either the GNU General Public -License or the Artistic License, as specified in the Perl README file. +License or the Artistic License, as specified in the Perl 5.10.0 README file. =head1 SUPPORT / WARRANTY diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/DBI-1.608/DBI.xs new/DBI-1.609/DBI.xs --- old/DBI-1.608/DBI.xs 2009-03-02 12:14:14.000000000 +0100 +++ new/DBI-1.609/DBI.xs 2009-06-08 12:04:15.000000000 +0200 @@ -1,6 +1,6 @@ /* vim: ts=8:sw=4 * - * $Id: DBI.xs 12559 2009-03-02 11:14:07Z timbo $ + * $Id: DBI.xs 12810 2009-06-05 22:13:00Z timbo $ * * Copyright (c) 1994-2003 Tim Bunce Ireland. * @@ -111,7 +111,7 @@ #define IMA_NO_TAINT_IN 0x0010 /* don't check for tainted args */ #define IMA_NO_TAINT_OUT 0x0020 /* don't taint results */ #define IMA_COPY_UP_STMT 0x0040 /* copy sth Statement to dbh */ -#define IMA_END_WORK 0x0080 /* set on commit & rollback */ +#define IMA_END_WORK 0x0080 /* method is commit or rollback */ #define IMA_STUB 0x0100 /* donothing eg $dbh->connected */ #define IMA_CLEAR_STMT 0x0200 /* clear Statement before call */ #define IMA_UNRELATED_TO_STMT 0x0400 /* profile as empty Statement */ diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/DBI-1.608/Driver.xst new/DBI-1.609/Driver.xst --- old/DBI-1.608/Driver.xst 2009-02-24 23:31:57.000000000 +0100 +++ new/DBI-1.609/Driver.xst 2009-06-08 12:07:26.000000000 +0200 @@ -1,4 +1,4 @@ -# $Id: Driver.xst 11723 2008-09-02 10:09:51Z mjevans $ +# $Id: Driver.xst 12816 2009-06-08 10:07:26Z timbo $ # Copyright (c) 1997-2002 Tim Bunce Ireland # Copyright (c) 2002 Jonathan Leffler # @@ -366,16 +366,16 @@ This will be harmless if the application has issued a commit, XXX Could add an attribute flag to indicate that the driver doesn't have this problem. Patches welcome. - XXX or could just move the DBIc_is(imp_dbh, DBIcf_Executed) test - to cover the rollback as well. That just needs sanity checking - that DBIcf_Executed is set by any/all possible way to execute a - statement that might start a transaction. */ if (DBIc_WARN(imp_dbh) && DBIc_is(imp_dbh, DBIcf_Executed) /* has not just called commit/rollback */ && (!dirty || DBIc_DBISTATE(imp_dbh)->debug >= 3) - ) - warn("Issuing rollback() for database handle being DESTROY'd without explicit disconnect()"); + ) { + warn("Issuing rollback() due to DESTROY without explicit disconnect() of %s handle %s", + SvPV_nolen(*hv_fetch((HV*)SvRV(dbh), "ImplementorClass", 16, 1)), + SvPV_nolen(*hv_fetch((HV*)SvRV(dbh), "Name", 4, 1)) + ); + } dbd_db_rollback(dbh, imp_dbh); /* ROLLBACK! */ } dbd_db_disconnect(dbh, imp_dbh); diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/DBI-1.608/MANIFEST new/DBI-1.609/MANIFEST --- old/DBI-1.608/MANIFEST 2009-05-05 13:13:45.000000000 +0200 +++ new/DBI-1.609/MANIFEST 2009-06-08 12:09:30.000000000 +0200 @@ -11,6 +11,7 @@ Roadmap.pod Planned changes and enhancements for the DBI TASKS.pod Want to help? These things need doing... TODO_2005.txt Old (but still mostly relevant) occasional random notes about what's missing +TODO_gofer.txt To-do notes related to gofer dbd_xsh.h Prototypes for standard Driver.xst interface dbi_sql.h Definitions based on SQL CLI / ODBC (#inc'd by DBIXS.h) dbipport.h Perl portability macros (from Devel::PPort) diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/DBI-1.608/META.yml new/DBI-1.609/META.yml --- old/DBI-1.608/META.yml 2009-05-05 13:13:45.000000000 +0200 +++ new/DBI-1.609/META.yml 2009-06-08 12:09:30.000000000 +0200 @@ -1,6 +1,6 @@ --- #YAML:1.0 name: DBI -version: 1.608 +version: 1.609 abstract: Database independent interface for Perl license: perl author: diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/DBI-1.608/TASKS.pod new/DBI-1.609/TASKS.pod --- old/DBI-1.608/TASKS.pod 2006-09-04 23:33:44.000000000 +0200 +++ new/DBI-1.609/TASKS.pod 2009-06-08 11:37:25.000000000 +0200 @@ -33,4 +33,23 @@ Naturally I'll offer direction and guidance on any you want to tackle. I've also got a few that could be entered into rt.cpan.org. +=head2 Others + +General: + + Protect trace_msg from SIGPIPE? + prepare(...,{ Err=>\my $isolated_err, ...}) + Add trace module that just records the last N trace messages into an array + and prepends them to any error message to provide context for the error. + Document DBI_PROFILE_FLOCK and LockFile attrib in DBI::ProfileData and DBI::ProfileDumper + +Performance: + + Move _new_sth to DBI::db::_new_sth (leave alias) and implement in C + Or call _new_child and move to DBI::common? + + Implement FETCH_many() in C + + Add high-res dbi_time for windows - via Time::HiRes glob replace dbi_time()? + =cut diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/DBI-1.608/TODO_gofer.txt new/DBI-1.609/TODO_gofer.txt --- old/DBI-1.608/TODO_gofer.txt 1970-01-01 01:00:00.000000000 +0100 +++ new/DBI-1.609/TODO_gofer.txt 2009-06-08 11:33:14.000000000 +0200 @@ -0,0 +1,56 @@ +Gofer TODOs: + +DBD::Gofer and http transport changes +add comparisons with other proxies to gofer docs (see notes) + http://code.google.com/p/mod-ndb/ + http://code.nytimes.com/projects/dbslayer +update gofer pdf in distribution +talk about multiple statements in single sql for gofer +inbalance between two calls to _store_response_in_cache + - the call in transmit_request doesn't have the response_needs_retransmit logic + +Add server-side caching. + combine these: + my $request = $transport->thaw_request( $frozen_request, $serializer ); + my $response = $executor->execute_request( $request ); + my $frozen_response = $transport->freeze_response($response, $serializer); + into single method that first checks the cache and updates it if appropriate. + Different serializations will have different caches + +Add DBI::Gofer::Serialiser::MIME / Base64 +Add DBI::Gofer::Serialiser::JSON + +Gofer - allow dbh attrib changes after connect? + note them and pass in request as STORE method calls + but then gofer server need to reset them to restore dbh to original state + Or, change the attr in the connect() call, but that risks + bloating the number of cache dbh in the server. +Gofer request flags for: + - return current executor stats as an attribute - handy for tests + - will accept streamed resultsets +Add attr-passthru to prepare()? ie for gofer cache control & ReadOnly +Define and document termind that first checks the cache and updates it if appropriate. + Different serializations will have different caches + +Add DBI::Gofer::Serialiser::MIME / Base64 +Add DBI::Gofer::Serialiser::JSON + +Gofer - allow dbh attrib changes after connect? + note them and pass in request as STORE method calls + but then gofer server need to reset them to restore dbh to original state + Or, change the attr in the connect() call, but that risks + bloating the number of cache dbh in the server. +Gofer request flags for: + - return current executor stats as an attribute - handy for tests + - will accept streamed resultsets +Add attr-passthru to prepare()? ie for gofer cache control & ReadOnly +Define and document terminology for client and server ends +Document user/passwd issues at the various levels of the gofer stack + Remove "Password" from connect attr if the same as $password arg +Extract policy settings by parsing the pod +Policy for dbh attr FETCH (ie example_driver_path) + or piggyback on skip_connect_check + could also remember which attr have been returned to us + so not bother FETCHing them (unless pedantic) +Call method on transport failure so transport can cleanup/reset if it wants +Gofer: gearman - need to disable coallesing for non-idempotent requests diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/DBI-1.608/lib/DBD/File.pm new/DBI-1.609/lib/DBD/File.pm --- old/DBI-1.608/lib/DBD/File.pm 2009-05-03 00:34:20.000000000 +0200 +++ new/DBI-1.609/lib/DBD/File.pm 2009-06-05 15:21:19.000000000 +0200 @@ -33,7 +33,7 @@ use vars qw( @ISA $VERSION $drh $valid_attrs ); -$VERSION = "0.36"; +$VERSION = "0.37"; $drh = undef; # holds driver handle(s) once initialised @@ -74,13 +74,10 @@ sub file2table { - my ($data, $dir, $file, $file_is_tab) = @_; + my ($data, $dir, $file, $file_is_tab, $quoted) = @_; $file eq "." || $file eq ".." and return; - # Fully Qualified File Name - my $fqfn = File::Spec->catfile ($dir, $file); - my ($ext, $req) = ("", 0, 0); if ($data->{f_ext}) { ($ext, my $opt) = split m/\//, $data->{f_ext}; @@ -90,8 +87,17 @@ } (my $tbl = $file) =~ s/$ext$//i; + $file_is_tab and $file = "$tbl$ext"; - $file_is_tab && $file !~ m/$ext$/i and $fqfn .= $ext; + # Fully Qualified File Name + my $fqfn; + unless ($quoted) { # table names are case insensitive in SQL + local *DIR; + opendir DIR, $dir; + my @f = grep { lc $_ eq lc $file } readdir DIR; + @f == 1 and $file = $f[0]; + } + $fqfn = File::Spec->catfile ($dir, $file); $file = $fqfn; if ($ext) { @@ -149,10 +155,11 @@ } } $this->{f_valid_attrs} = { - f_version => 1, # DBD::File version - f_dir => 1, # base directory - f_ext => "", # file extension - f_tables => 1, # base directory + f_version => 1, # DBD::File version + f_dir => 1, # base directory + f_ext => 1, # file extension + f_schema => 1, # schema name + f_tables => 1, # base directory }; $this->{sql_valid_attrs} = { sql_handler => 1, # Nano or S:S @@ -346,7 +353,7 @@ return $dbh->set_err ($DBI::stderr, "No such directory '$value'") } if ($attrib eq "f_ext") { - $value eq "" || $value =~ m{^\.\w+(?:/[iIrR]*)?$} + $value eq "" || $value =~ m{^\.\w+(?:/[rR]*)?$} or carp "'$value' doesn't look like a valid file extension attribute\n"; } $dbh->{$attrib} = $value; @@ -417,10 +424,12 @@ } my ($file, @tables, %names); - my $user = eval { getpwuid ((stat _)[4]) }; + my $schema = exists $dbh->{f_schema} + ? $dbh->{f_schema} + : eval { getpwuid ((stat $dir)[4]) }; while (defined ($file = readdir ($dirh))) { - my $tbl = DBD::File::file2table ($dbh, $dir, $file, 0) or next; - push @tables, [ undef, $user, $tbl, "TABLE", undef ]; + my $tbl = DBD::File::file2table ($dbh, $dir, $file, 0, 0) or next; + push @tables, [ undef, $schema, $tbl, "TABLE", undef ]; } unless (closedir $dirh) { $dbh->set_err ($DBI::stderr, "Cannot close directory $dir: $!"); @@ -541,13 +550,24 @@ $sth->finish; my $stmt = $sth->{f_stmt}; - unless ((my $req_prm = scalar($stmt->params())) == (my $nparm = @$params)) { - $sth->set_err ($DBI::stderr, - "You passed $nparm parameters where $req_prm required"); - return; + unless ($sth->{f_params_checked}++) { + # bug in SQL::Statement 1.20 and below causes breakage + # on all but the first call + unless ((my $req_prm = $stmt->params ()) == (my $nparm = @$params)) { + my $msg = "You passed $nparm parameters where $req_prm required"; + $sth->set_err ($DBI::stderr, $msg); + return; + } + } + my @err; + my $result = eval { + local $SIG{__WARN__} = sub { push @err, @_ }; + $stmt->execute ($sth, $params); + }; + if ($@ || @err) { + $sth->set_err ($DBI::stderr, $@ || $err[0]); + return undef; } - my $result = eval { $stmt->execute ($sth, $params); }; - $@ and return $sth->set_err ($DBI::stderr, $@); if ($stmt->{NUM_OF_FIELDS}) { # is a SELECT statement $sth->STORE (Active => 1); @@ -658,7 +678,8 @@ sub get_file_name ($$$) { my ($self, $data, $table) = @_; - $table =~ s/^\"//; # handle quoted identifiers + my $quoted = 0; + $table =~ s/^\"// and $quoted = 1; # handle quoted identifiers $table =~ s/\"$//; my $file = $table; if ( $file !~ m/^$open_table_re/o @@ -666,7 +687,8 @@ and $file !~ m{^[a-z]\:} # drive letter ) { exists $data->{Database}{f_map}{$table} or - DBD::File::file2table ($data->{Database}, $data->{Database}{f_dir}, $file, 1); + DBD::File::file2table ($data->{Database}, + $data->{Database}{f_dir}, $file, 1, $quoted); $file = $data->{Database}{f_map}{$table} || undef; } return ($table, $file); @@ -697,12 +719,10 @@ $fh and binmode $fh; if ($locking and $fh) { if ($lockMode) { - flock $fh, 2 or - croak "Cannot obtain exclusive lock on $file: $!"; + flock $fh, 2 or croak "Cannot obtain exclusive lock on $file: $!"; } else { - flock $fh, 1 or - croak "Cannot obtain shared lock on $file: $!"; + flock $fh, 1 or croak "Cannot obtain shared lock on $file: $!"; } } my $columns = {}; @@ -871,6 +891,34 @@ In this case the extension is required, and all filenames that do not match are ignored. +=item f_schema + +This will set the schema name. Default is the owner of the folder in which +the table file resides. C<undef> is allowed. + + my $dbh = DBI->connect ("dbi:CSV:", "", "", { + f_schema => undef, + f_dir => "data", + f_ext => ".csv/r", + }) or die $DBI::errstr; + +The effect is that when you get table names from DBI, you can force all +tables into the same (or no) schema: + + my @tables $dbh->tables (); + + # no f_schema + "merijn".foo + "merijn".bar + + # f_schema => "dbi" + "dbi".foo + "dbi".bar + + # f_schema => undef + foo + bar + =back =head2 Driver private methods @@ -913,7 +961,7 @@ =back -=head1 AUTHOR +=head1 AUTHOR This module is currently maintained by diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/DBI-1.608/lib/DBI/ProxyServer.pm new/DBI-1.609/lib/DBI/ProxyServer.pm --- old/DBI-1.608/lib/DBI/ProxyServer.pm 2008-02-11 22:36:52.000000000 +0100 +++ new/DBI-1.609/lib/DBI/ProxyServer.pm 2009-06-06 00:46:02.000000000 +0200 @@ -531,6 +531,13 @@ =back +=head1 SHUTDOWN + +DBI::ProxyServer is built on L<RPC::PlServer> which is, in turn, built on L<Net::Daemon>. + +You should refer to L<Net::Daemon> for how to shutdown the server, except that +you can't because it's not currently documented there (as of v0.43). +The bottom-line is that it seems that there's no support for graceful shutdown. =head1 CONFIGURATION FILE diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/DBI-1.608/t/40profile.t new/DBI-1.609/t/40profile.t --- old/DBI-1.608/t/40profile.t 2008-07-20 08:39:20.000000000 +0200 +++ new/DBI-1.609/t/40profile.t 2009-06-06 00:23:57.000000000 +0200 @@ -19,9 +19,18 @@ BEGIN { plan skip_all => "profiling not supported for DBI::PurePerl" if $DBI::PurePerl; + # tie methods (STORE/FETCH etc) get called different number of times plan skip_all => "test results assume perl >= 5.8.2" if $] <= 5.008001; + + # clock instability on xen systems is a reasonably common cause of failure + # http://www.nntp.perl.org/group/perl.cpan.testers/2009/05/msg3828158.html + # so we'll skip automated testing on those systems + plan skip_all => "skipping profile tests on xen (due to clock instability)" + if $Config{osvers} =~ /xen/ # eg 2.6.18-4-xen-amd64 + and $ENV{AUTOMATED_TESTING}; + plan tests => 60; } diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/DBI-1.608/t/41prof_dump.t new/DBI-1.609/t/41prof_dump.t --- old/DBI-1.608/t/41prof_dump.t 2007-06-28 15:10:43.000000000 +0200 +++ new/DBI-1.609/t/41prof_dump.t 2009-06-07 22:25:42.000000000 +0200 @@ -10,16 +10,21 @@ # use DBI; - +use Config; use Test::More; BEGIN { - if ($DBI::PurePerl) { - plan skip_all => 'profiling not supported for DBI::PurePerl'; - } - else { - plan tests => 15; - } + plan skip_all => 'profiling not supported for DBI::PurePerl' + if $DBI::PurePerl; + + # clock instability on xen systems is a reasonably common cause of failure + # http://www.nntp.perl.org/group/perl.cpan.testers/2009/05/msg3828158.html + # so we'll skip automated testing on those systems + plan skip_all => "skipping profile tests on xen (due to clock instability)" + if $Config{osvers} =~ /xen/ # eg 2.6.18-4-xen-amd64 + and $ENV{AUTOMATED_TESTING}; + + plan tests => 15; } BEGIN { diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/DBI-1.608/t/42prof_data.t new/DBI-1.609/t/42prof_data.t --- old/DBI-1.608/t/42prof_data.t 2007-05-31 18:14:17.000000000 +0200 +++ new/DBI-1.609/t/42prof_data.t 2009-06-07 22:26:21.000000000 +0200 @@ -4,16 +4,21 @@ use strict; use DBI; - +use Config; use Test::More; BEGIN { - if ($DBI::PurePerl) { - plan skip_all => 'profiling not supported for DBI::PurePerl'; - } - else { - plan tests => 31; - } + plan skip_all => 'profiling not supported for DBI::PurePerl' + if $DBI::PurePerl; + + # clock instability on xen systems is a reasonably common cause of failure + # http://www.nntp.perl.org/group/perl.cpan.testers/2009/05/msg3828158.html + # so we'll skip automated testing on those systems + plan skip_all => "skipping profile tests on xen (due to clock instability)" + if $Config{osvers} =~ /xen/ # eg 2.6.18-4-xen-amd64 + and $ENV{AUTOMATED_TESTING}; + + plan tests => 31; } BEGIN { diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/DBI-1.608/t/72childhandles.t new/DBI-1.609/t/72childhandles.t --- old/DBI-1.608/t/72childhandles.t 2007-02-06 11:52:11.000000000 +0100 +++ new/DBI-1.609/t/72childhandles.t 2009-06-06 00:10:09.000000000 +0200 @@ -23,7 +23,7 @@ exit 0; } -plan tests => 14; +plan tests => 16; my $using_dbd_gofer = ($ENV{DBI_AUTOPROXY}||'') =~ /^dbi:Gofer.*transport=/i; @@ -101,6 +101,38 @@ my @live = grep { defined $_ } @$handles; is scalar @live, 0, "handles should be gone now"; +# test visit_child_handles +{ + my $info; + my $visitor = sub { + my ($h, $info) = @_; + my $type = $h->{Type}; + ++$info->{ $type }{ ($type eq 'st') ? $h->{Statement} : $h->{Name} }; + return $info; + }; + DBI->visit_handles($visitor, $info = {}); + is_deeply $info, { + 'dr' => { + 'ExampleP' => 1, + ($using_dbd_gofer) ? (Gofer => 1) : () + }, + 'db' => { '' => 1 }, + }; + + my $sth1 = $dbh->prepare('SELECT name FROM t'); + my $sth2 = $dbh->prepare('SELECT name FROM t'); + DBI->visit_handles($visitor, $info = {}); + is_deeply $info, { + 'dr' => { + 'ExampleP' => 1, + ($using_dbd_gofer) ? (Gofer => 1) : () + }, + 'db' => { '' => 1 }, + 'st' => { 'SELECT name FROM t' => 2 } + }; + +} + # test that the childhandle array does not grow uncontrollably SKIP: { skip "slow tests avoided when using DBD::Gofer", 2 if $using_dbd_gofer; diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/DBI-1.608/t/80proxy.t new/DBI-1.609/t/80proxy.t --- old/DBI-1.608/t/80proxy.t 2007-11-15 00:29:35.000000000 +0100 +++ new/DBI-1.609/t/80proxy.t 2009-06-06 00:17:05.000000000 +0200 @@ -109,7 +109,7 @@ ($dbitracelevel >= 2 ? ('--debug') : ()), '--mode=single', '--logfile=STDERR', - '--timeout=60' + '--timeout=90' ); warn " starting test dbiproxy process: @child_args\n" if DBI->trace(0); ($handle, $port) = Net::Daemon::Test->Child($numTests, @child_args); diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/DBI-1.608/t/85gofer.t new/DBI-1.609/t/85gofer.t --- old/DBI-1.608/t/85gofer.t 2009-03-18 11:11:14.000000000 +0100 +++ new/DBI-1.609/t/85gofer.t 2009-06-06 00:19:41.000000000 +0200 @@ -46,7 +46,7 @@ } my $remote_driver_dsn = "dbm_type=$opt_dbm;lockfile=0"; my $remote_dsn = "dbi:DBM:$remote_driver_dsn"; -my $timeout = 90; # for slow/overloaded systems (incl virtual machines with low priority) +my $timeout = 120; # for slow/overloaded systems (incl virtual machines with low priority) plan 'no_plan'; ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ Remember to have fun... -- To unsubscribe, e-mail: opensuse-commit+unsubscribe(a)opensuse.org For additional commands, e-mail: opensuse-commit+help(a)opensuse.org

1 0

commit perl-Test-Exception for openSUSE:Factory
by root＠Hilbert.suse.de 27 Jul '09

27 Jul '09

Hello community, here is the log from the commit of package perl-Test-Exception for openSUSE:Factory checked in at Mon Jul 27 22:07:05 CEST 2009. -------- --- perl-Test-Exception/perl-Test-Exception.changes 2008-02-25 14:13:16.000000000 +0100 +++ perl-Test-Exception/perl-Test-Exception.changes 2009-07-25 19:44:28.000000000 +0200 @@ -1,0 +2,22 @@ +Sat Jul 25 19:44:26 CEST 2009 - chris(a)computersalat.de + +- spec mods + * removed ^---------- + * removed ^#--------- + +------------------------------------------------------------------- +Tue Jul 14 11:32:17 CEST 2009 - chris(a)computersalat.de + +- fixed deps + o Req for Test::Builder + +------------------------------------------------------------------- +Wed Jul 1 13:12:01 CEST 2009 - chris(a)computersalat.de + +- added perl-macros + o autogen filelist with perl_gen_filelist +- spec mods + o added header + o fixed deps + +------------------------------------------------------------------- calling whatdependson for head-i586 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ Other differences: ------------------ ++++++ perl-Test-Exception.spec ++++++ --- /var/tmp/diff_new_pack.JF1Lfe/_old 2009-07-27 21:54:06.000000000 +0200 +++ /var/tmp/diff_new_pack.JF1Lfe/_new 2009-07-27 21:54:06.000000000 +0200 @@ -19,55 +19,72 @@ Name: perl-Test-Exception -BuildRequires: perl-Sub-Uplevel +%define cpan_name %( echo %{name} | %{__sed} -e 's,perl-,,' ) +Summary: Test::Exception - Test exception based code Version: 0.27 -Release: 41 -Requires: perl = %{perl_version} -Requires: perl-Sub-Uplevel -AutoReqProv: on +Release: 42 +License: Artistic License .. Group: Development/Libraries/Perl -License: Artistic License -Url: http://cpan.org/modules/by-module/Test/ -Summary: Test::Exception - Test exception based code +Url: http://search.cpan.org/dist/Test-Exception Source: Test-Exception-%{version}.tar.bz2 BuildRoot: %{_tmppath}/%{name}-%{version}-build +BuildRequires: perl +BuildRequires: perl-macros +BuildRequires: perl(Test::Pod) >= 1.00 +BuildRequires: perl(Test::Simple) >= 0.7 +# only perl >= 5.10.0 will fullfill deps +#%if %{perl_subversion} > 8 +##echo "breq Test::Builder >=0.7" +#BuildRequires: perl(Test::Builder) >= 0.7 +#BuildRequires: perl(Test::Builder::Tester) >= 1.07 +#%else +BuildRequires: perl(Test::Builder) +BuildRequires: perl(Test::Builder::Tester) +#%endif +BuildRequires: perl(Test::More) >= 0.7 +BuildRequires: perl(Test::Harness) >= 2.03 +BuildRequires: perl(Sub::Uplevel) >= 0.18 +# +Requires: perl = %{perl_version} +Requires: perl(Sub::Uplevel) >= 0.18 +Requires: perl(Test::More) >= 0.7 +# only perl >= 5.10.0 will fullfill deps +#%if %{perl_subversion} > 8 +##echo "req Test::Builder >=0.7" +#Requires: perl(Test::Builder) >= 0.7 +#%else +#echo "req Test::Builder" +Requires: perl(Test::Builder) +#%endif %description This module provides a few convenience methods for testing exception based code. It is built with Test::Builder and plays happily with Test::More and friends. - - -Authors: --------- - Adrian Howard <adrianh(a)quietstars.com> - + Authors: Adrian Howard <adrianh(a)quietstars.com> %prep -%setup -q -n Test-Exception-%{version} +%setup -q -n %{cpan_name}-%{version} +echo "perlVersion: "%{perl_version} %build -perl Makefile.PL -make +perl Makefile.PL OPTIMIZE="$RPM_OPT_FLAGS -Wall" +%{__make} %check -make test +%{__make} test %install %perl_make_install %perl_process_packlist +%perl_gen_filelist %clean -rm -rf $RPM_BUILD_ROOT +%{__rm} -rf $RPM_BUILD_ROOT -%files -%defattr(-,root,root) -%doc README -%doc %{_mandir}/man?/* -/var/adm/perl-modules/%{name} -%dir %{perl_vendorlib}/Test -%dir %{perl_vendorarch}/auto/Test/ -%{perl_vendorlib}/Test/Exception.pm -%{perl_vendorarch}/auto/Test/Exception/ +%files -f %{name}.files +# normally you only need to check for doc files +%defattr(0644,root,root,0755) +%doc Changes README %changelog ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ Remember to have fun... -- To unsubscribe, e-mail: opensuse-commit+unsubscribe(a)opensuse.org For additional commands, e-mail: opensuse-commit+help(a)opensuse.org

1 0

commit perl-Sub-Uplevel for openSUSE:Factory
by root＠Hilbert.suse.de 27 Jul '09

27 Jul '09

Hello community, here is the log from the commit of package perl-Sub-Uplevel for openSUSE:Factory checked in at Mon Jul 27 21:53:47 CEST 2009. -------- --- perl-Sub-Uplevel/perl-Sub-Uplevel.changes 2008-09-12 12:53:36.000000000 +0200 +++ perl-Sub-Uplevel/perl-Sub-Uplevel.changes 2009-07-25 19:42:22.000000000 +0200 @@ -1,0 +2,16 @@ +Sat Jul 25 19:42:19 CEST 2009 - chris(a)computersalat.de + +- spec mods + * removed ^---------- + * removed ^#--------- + +------------------------------------------------------------------- +Wed Jul 1 13:41:09 CEST 2009 - chris(a)computersalat.de + +- added perl-macros + o autogen filelist with perl_gen_filelist +- spec mods + o added header + o fixed deps + +------------------------------------------------------------------- calling whatdependson for head-i586 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ Other differences: ------------------ ++++++ perl-Sub-Uplevel.spec ++++++ --- /var/tmp/diff_new_pack.3ms4xY/_old 2009-07-27 21:50:23.000000000 +0200 +++ /var/tmp/diff_new_pack.3ms4xY/_new 2009-07-27 21:50:23.000000000 +0200 @@ -1,7 +1,7 @@ # # spec file for package perl-Sub-Uplevel (Version 0.2002) # -# Copyright (c) 2008 SUSE LINUX Products GmbH, Nuernberg, Germany. +# Copyright (c) 2009 SUSE LINUX Products GmbH, Nuernberg, Germany. # # All modifications and additions to the file contributed by third parties # remain the property of their copyright owners, unless otherwise agreed @@ -19,55 +19,50 @@ Name: perl-Sub-Uplevel +%define cpan_name %( echo %{name} | %{__sed} -e 's,perl-,,' ) +Summary: Apparently run a function in a higher stack frame Version: 0.2002 -Release: 1 -Requires: perl = %{perl_version} -AutoReqProv: on +Release: 4 +License: Artistic License .. Group: Development/Libraries/Perl -License: Artistic License -Url: http://cpan.org/modules/by-module/Sub/ -Summary: Sub::Uplevel - apparently run a function in a higher stack frame -Source: Sub-Uplevel-%{version}.tar.bz2 +Url: http://search.cpan.org/dist/Sub-Uplevel +Source: %{cpan_name}-%{version}.tar.bz2 BuildRoot: %{_tmppath}/%{name}-%{version}-build +BuildRequires: perl +BuildRequires: perl-macros +BuildRequires: perl(Carp) +BuildRequires: perl(Test::More) >= 0.47 +Requires: perl = %{perl_version} %description Like Tcl's uplevel() function, but not quite so dangerous. The idea is just to fool caller(). All the really naughty bits of Tcl's uplevel() are avoided. - - Authors: --------- David A Golden <dagolden(a)cpan.org> (current maintainer) - Michael G Schwern <schwern(a)pobox.com> (original author) - %prep -%setup -q -n Sub-Uplevel-%{version} +%setup -q -n %{cpan_name}-%{version} %build -perl Makefile.PL -make +perl Makefile.PL OPTIMIZE="$RPM_OPT_FLAGS -Wall" +%{__make} %check -make test +%{__make} test %install %perl_make_install %perl_process_packlist +%perl_gen_filelist %clean -rm -rf $RPM_BUILD_ROOT +%{__rm} -rf $RPM_BUILD_ROOT -%files +%files -f %{name}.files +# normally you only need to check for doc files %defattr(-,root,root) -%doc README -%doc %{_mandir}/man?/* -/var/adm/perl-modules/%{name} -%dir %{perl_vendorlib}/Sub/ -%dir %{perl_vendorarch}/auto/Sub/ -%{perl_vendorlib}/Sub/* -%{perl_vendorarch}/auto/Sub/Uplevel/ +%doc Changes LICENSE README %changelog ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ Remember to have fun... -- To unsubscribe, e-mail: opensuse-commit+unsubscribe(a)opensuse.org For additional commands, e-mail: opensuse-commit+help(a)opensuse.org

1 0

commit OpenOffice_org-extensions for openSUSE:Factory
by root＠Hilbert.suse.de 27 Jul '09

27 Jul '09

Hello community, here is the log from the commit of package OpenOffice_org-extensions for openSUSE:Factory checked in at Mon Jul 27 18:59:32 CEST 2009. -------- --- OpenOffice_org-extensions/OpenOffice_org-extensions.changes 2009-06-29 20:32:47.000000000 +0200 +++ OpenOffice_org-extensions/OpenOffice_org-extensions.changes 2009-07-23 21:59:24.000000000 +0200 @@ -1,0 +2,6 @@ +Thu Jul 23 21:16:24 CEST 2009 - pmladek(a)suse.cz + +- updated to the milestone ooo310-m16 +- updated ooo-build to version 3.1.0.99.1 (3.1.1-beta1) + +------------------------------------------------------------------- calling whatdependson for head-i586 Old: ---- ooo310-m14-extensions.tar.bz2 New: ---- ooo310-m16-extensions.tar.bz2 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ Other differences: ------------------ ++++++ OpenOffice_org-extensions.spec ++++++ --- /var/tmp/diff_new_pack.RQZyoN/_old 2009-07-27 18:59:00.000000000 +0200 +++ /var/tmp/diff_new_pack.RQZyoN/_new 2009-07-27 18:59:00.000000000 +0200 @@ -1,5 +1,5 @@ # -# spec file for package OpenOffice_org-extensions (Version 3.1.0.98.2) +# spec file for package OpenOffice_org-extensions (Version 3.1.0.99.1) # # Copyright (c) 2009 SUSE LINUX Products GmbH, Nuernberg, Germany. # @@ -19,9 +19,9 @@ Name: OpenOffice_org-extensions -Version: 3.1.0.98.2 +Version: 3.1.0.99.1 Release: 1 -%define ooo_build_version 3.1.0.98.2 +%define ooo_build_version 3.1.0.99.1 %define piece extensions #!BuildIgnore: OpenOffice_org BuildRequires: ImageMagick ant ant-apache-regexp bison boost-devel ccache cups-devel curl-devel db-devel flac-devel flex gnome-vfs2-devel gperf gtk2-devel icu java-devel kdelibs3-devel krb5 libexif mono-devel neon-devel openldap2-devel pam-devel perl-Archive-Zip perl-Compress-Zlib python-devel python-xml recode unixODBC-devel unzip xml-commons-apis xorg-x11 zip @@ -36,7 +36,7 @@ %endif %define ooo_prefix %_libdir %define ooo_home ooo3 -%define ooo_build_tag ooo310-m14 +%define ooo_build_tag ooo310-m16 License: LGPL v2.1 or later ; LGPL v3 only ; Other uncritical OpenSource License ; Apache Software License .. Group: Productivity/Office/Suite AutoReqProv: on ++++++ ooo310-m14-extensions.tar.bz2 -> ooo310-m16-extensions.tar.bz2 ++++++ OpenOffice_org-extensions/ooo310-m14-extensions.tar.bz2 OpenOffice_org-extensions/ooo310-m16-extensions.tar.bz2 differ: char 11, line 1 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ Remember to have fun... -- To unsubscribe, e-mail: opensuse-commit+unsubscribe(a)opensuse.org For additional commands, e-mail: opensuse-commit+help(a)opensuse.org

1 0