Hello community,
here is the log from the commit of package yast2-perl-bindings
checked in at Thu Aug 10 18:20:07 CEST 2006.
--------
--- yast2-perl-bindings/yast2-perl-bindings.changes 2006-08-07 15:53:39.000000000 +0200
+++ yast2-perl-bindings/yast2-perl-bindings.changes 2006-08-09 14:38:50.000000000 +0200
@@ -1,0 +2,7 @@
+Wed Aug 9 12:29:27 CEST 2006 - mvidner@suse.cz
+
+- Use the Import class when calling a YCP function
+ so that the log is not flooded with "import (Foo)" (#197845).
+- 2.13.9
+
+-------------------------------------------------------------------
Old:
----
yast2-perl-bindings-2.13.8.tar.bz2
New:
----
yast2-perl-bindings-2.13.9.tar.bz2
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Other differences:
------------------
++++++ yast2-perl-bindings.spec ++++++
--- /var/tmp/diff_new_pack.cAgwqP/_old 2006-08-10 18:20:00.000000000 +0200
+++ /var/tmp/diff_new_pack.cAgwqP/_new 2006-08-10 18:20:00.000000000 +0200
@@ -1,5 +1,5 @@
#
-# spec file for package yast2-perl-bindings (Version 2.13.8)
+# spec file for package yast2-perl-bindings (Version 2.13.9)
#
# Copyright (c) 2006 SUSE LINUX Products GmbH, Nuernberg, Germany.
# This file and all modifications and additions to the pristine
@@ -11,12 +11,12 @@
# norootforbuild
Name: yast2-perl-bindings
-Version: 2.13.8
+Version: 2.13.9
Release: 1
License: GPL
Group: System/YaST
BuildRoot: %{_tmppath}/%{name}-%{version}-build
-Source0: yast2-perl-bindings-2.13.8.tar.bz2
+Source0: yast2-perl-bindings-2.13.9.tar.bz2
prefix: /usr
BuildRequires: blocxx-devel curl-devel gcc-c++ libxcrypt-devel libzypp-devel rpm-devel yast2-core-devel yast2-devtools
# libzypp-devel is missing .la requires
@@ -39,7 +39,7 @@
Martin Vidner
%prep
-%setup -n yast2-perl-bindings-2.13.8
+%setup -n yast2-perl-bindings-2.13.9
%build
%{prefix}/bin/y2tool y2autoconf
@@ -78,6 +78,10 @@
%doc %{prefix}/share/doc/packages/yast2-perl-bindings
%changelog -n yast2-perl-bindings
+* Wed Aug 09 2006 - mvidner@suse.cz
+- Use the Import class when calling a YCP function
+ so that the log is not flooded with "import (Foo)" (#197845).
+- 2.13.9
* Mon Aug 07 2006 - mvidner@suse.cz
- Fixed the SWIG fix not to end a comment prematurely.
- 2.13.8
++++++ yast2-perl-bindings-2.13.8.tar.bz2 -> yast2-perl-bindings-2.13.9.tar.bz2 ++++++
diff -urN --exclude=CVS --exclude=.cvsignore --exclude=.svn --exclude=.svnignore old/yast2-perl-bindings-2.13.8/VERSION new/yast2-perl-bindings-2.13.9/VERSION
--- old/yast2-perl-bindings-2.13.8/VERSION 2006-08-07 15:52:10.000000000 +0200
+++ new/yast2-perl-bindings-2.13.9/VERSION 2006-08-09 14:38:09.000000000 +0200
@@ -1 +1 @@
-2.13.8
+2.13.9
diff -urN --exclude=CVS --exclude=.cvsignore --exclude=.svn --exclude=.svnignore old/yast2-perl-bindings-2.13.8/configure new/yast2-perl-bindings-2.13.9/configure
--- old/yast2-perl-bindings-2.13.8/configure 2006-08-07 15:55:02.000000000 +0200
+++ new/yast2-perl-bindings-2.13.9/configure 2006-08-09 14:42:01.000000000 +0200
@@ -1,6 +1,6 @@
#! /bin/sh
# Guess values for system-dependent variables and create Makefiles.
-# Generated by GNU Autoconf 2.59 for yast2-perl-bindings 2.13.8.
+# Generated by GNU Autoconf 2.59 for yast2-perl-bindings 2.13.9.
#
# Report bugs to http://bugs.opensuse.org/.
#
@@ -423,8 +423,8 @@
# Identity of this package.
PACKAGE_NAME='yast2-perl-bindings'
PACKAGE_TARNAME='yast2-perl-bindings'
-PACKAGE_VERSION='2.13.8'
-PACKAGE_STRING='yast2-perl-bindings 2.13.8'
+PACKAGE_VERSION='2.13.9'
+PACKAGE_STRING='yast2-perl-bindings 2.13.9'
PACKAGE_BUGREPORT='http://bugs.opensuse.org/'
ac_unique_file="RPMNAME"
@@ -959,7 +959,7 @@
# Omit some internal or obsolete options to make the list less imposing.
# This message is too long to be a string in the A/UX 3.1 sh.
cat <<_ACEOF
-\`configure' configures yast2-perl-bindings 2.13.8 to adapt to many kinds of systems.
+\`configure' configures yast2-perl-bindings 2.13.9 to adapt to many kinds of systems.
Usage: $0 [OPTION]... [VAR=VALUE]...
@@ -1026,7 +1026,7 @@
if test -n "$ac_init_help"; then
case $ac_init_help in
- short | recursive ) echo "Configuration of yast2-perl-bindings 2.13.8:";;
+ short | recursive ) echo "Configuration of yast2-perl-bindings 2.13.9:";;
esac
cat <<\_ACEOF
@@ -1169,7 +1169,7 @@
test -n "$ac_init_help" && exit 0
if $ac_init_version; then
cat <<\_ACEOF
-yast2-perl-bindings configure 2.13.8
+yast2-perl-bindings configure 2.13.9
generated by GNU Autoconf 2.59
Copyright (C) 2003 Free Software Foundation, Inc.
@@ -1183,7 +1183,7 @@
This file contains any messages produced by compilers while
running configure, to aid debugging if configure makes a mistake.
-It was created by yast2-perl-bindings $as_me 2.13.8, which was
+It was created by yast2-perl-bindings $as_me 2.13.9, which was
generated by GNU Autoconf 2.59. Invocation command line was
$ $0 $@
@@ -1913,7 +1913,7 @@
# Define the identity of the package.
PACKAGE='yast2-perl-bindings'
- VERSION='2.13.8'
+ VERSION='2.13.9'
cat >>confdefs.h <<_ACEOF
@@ -2124,7 +2124,7 @@
-VERSION="2.13.8"
+VERSION="2.13.9"
RPMNAME="yast2-perl-bindings"
MAINTAINER="Martin Vidner "
@@ -19989,7 +19989,7 @@
} >&5
cat >&5 <<_CSEOF
-This file was extended by yast2-perl-bindings $as_me 2.13.8, which was
+This file was extended by yast2-perl-bindings $as_me 2.13.9, which was
generated by GNU Autoconf 2.59. Invocation command line was
CONFIG_FILES = $CONFIG_FILES
@@ -20052,7 +20052,7 @@
cat >>$CONFIG_STATUS <<_ACEOF
ac_cs_version="\\
-yast2-perl-bindings config.status 2.13.8
+yast2-perl-bindings config.status 2.13.9
configured by $0, generated by GNU Autoconf 2.59,
with options \\"`echo "$ac_configure_args" | sed 's/[\\""\`\$]/\\\\&/g'`\\"
@@ -21477,7 +21477,7 @@
} >&5
cat >&5 <<_CSEOF
-This file was extended by yast2-perl-bindings $as_me 2.13.8, which was
+This file was extended by yast2-perl-bindings $as_me 2.13.9, which was
generated by GNU Autoconf 2.59. Invocation command line was
CONFIG_FILES = $CONFIG_FILES
@@ -21540,7 +21540,7 @@
cat >>$CONFIG_STATUS <<_ACEOF
ac_cs_version="\\
-yast2-perl-bindings config.status 2.13.8
+yast2-perl-bindings config.status 2.13.9
configured by $0, generated by GNU Autoconf 2.59,
with options \\"`echo "$ac_configure_args" | sed 's/[\\""\`\$]/\\\\&/g'`\\"
diff -urN --exclude=CVS --exclude=.cvsignore --exclude=.svn --exclude=.svnignore old/yast2-perl-bindings-2.13.8/configure.in new/yast2-perl-bindings-2.13.9/configure.in
--- old/yast2-perl-bindings-2.13.8/configure.in 2006-08-07 15:54:35.000000000 +0200
+++ new/yast2-perl-bindings-2.13.9/configure.in 2006-08-09 14:41:16.000000000 +0200
@@ -3,7 +3,7 @@
dnl -- This file is generated by y2autoconf 2.13.20 - DO NOT EDIT! --
dnl (edit configure.in.in instead)
-AC_INIT(yast2-perl-bindings, 2.13.8, http://bugs.opensuse.org/, yast2-perl-bindings)
+AC_INIT(yast2-perl-bindings, 2.13.9, http://bugs.opensuse.org/, yast2-perl-bindings)
dnl Check for presence of file 'RPMNAME'
AC_CONFIG_SRCDIR([RPMNAME])
@@ -17,7 +17,7 @@
AM_INIT_AUTOMAKE(tar-ustar) dnl searches for some needed programs
dnl Important YaST2 variables
-VERSION="2.13.8"
+VERSION="2.13.9"
RPMNAME="yast2-perl-bindings"
MAINTAINER="Martin Vidner "
diff -urN --exclude=CVS --exclude=.cvsignore --exclude=.svn --exclude=.svnignore old/yast2-perl-bindings-2.13.8/src/YCP.cc new/yast2-perl-bindings-2.13.9/src/YCP.cc
--- old/yast2-perl-bindings-2.13.8/src/YCP.cc 2005-05-20 18:43:17.000000000 +0200
+++ new/yast2-perl-bindings-2.13.9/src/YCP.cc 2006-08-09 12:29:37.000000000 +0200
@@ -1,5 +1,5 @@
/**
- * $Id: YCP.cc 23501 2005-05-20 16:43:16Z mvidner $
+ * $Id: YCP.cc 32252 2006-08-09 10:31:09Z mvidner $
*
* This is the path from Perl to YCP. It defines XSUBs.
*/
@@ -11,6 +11,7 @@
#include
#include
#include
+#include
#include
#include
@@ -26,20 +27,11 @@
Y2Namespace *
getNs (const char * ns_name, const char * func_name)
{
- // func_name is only for debugging
- Y2Component *c = Y2ComponentBroker::getNamespaceComponent (ns_name);
- if (c == NULL)
- {
- y2error ("No component can provide namespace %s for a Perl call of %s",
- ns_name, func_name);
- return NULL;
- }
-
- Y2Namespace *ns = c->import (ns_name);
+ Import import(ns_name); // has a static cache
+ Y2Namespace *ns = import.nameSpace();
if (ns == NULL)
{
- y2error ("Component %p (%s) could not provide namespace %s for a Perl call of %s",
- c, c->name ().c_str (), ns_name, func_name);
+ y2error ("... for a Perl call of %s", func_name);
}
else
{
diff -urN --exclude=CVS --exclude=.cvsignore --exclude=.svn --exclude=.svnignore old/yast2-perl-bindings-2.13.8/src/YPerlNamespace.cc new/yast2-perl-bindings-2.13.9/src/YPerlNamespace.cc
--- old/yast2-perl-bindings-2.13.8/src/YPerlNamespace.cc 2005-10-11 11:17:18.000000000 +0200
+++ new/yast2-perl-bindings-2.13.9/src/YPerlNamespace.cc 2006-08-09 14:31:05.000000000 +0200
@@ -1,5 +1,5 @@
/**
- * $Id: YPerlNamespace.cc 25857 2005-10-11 09:17:15Z mvidner $
+ * $Id: YPerlNamespace.cc 32265 2006-08-09 12:32:38Z mvidner $
*
* This is the path from YCP to Perl.
*/
@@ -384,7 +384,8 @@
char *symbol;
I32 symlen;
- (void) hv_iternextsv (stash, &symbol, &symlen);
+ HE *he = hv_iternext (stash);
+ symbol = hv_iterkey (he, &symlen);
// we could optimize here by putting only interesting symbols
// into the array and thus reducing the sort time. later.
av_push (symbols_av, newSVpv (symbol, symlen));
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Remember to have fun...