ref: refs/heads/SuSE-Code-11-Branch
commit e0d06c81d3c61d1c0125751a13e2b1187514d8a6
Author: Ján Kupec
Date: Wed Apr 15 11:16:53 2009 +0200
Fixed requesting of perl symbols in 'install' (bnc #433679)
---
src/install.cc | 8 +++++++-
1 files changed, 7 insertions(+), 1 deletions(-)
diff --git a/src/install.cc b/src/install.cc
index e0a74ea..8b72666 100755
--- a/src/install.cc
+++ b/src/install.cc
@@ -553,7 +553,13 @@ void install_remove(Zypper & zypper,
string::size_type pos;
- if ((pos = str.rfind(':')) != string::npos)
+ // force repository specified by prefixing 'repo:' to the package name
+ if (!force_by_capability &&
+ //! \todo FIXME this causes problems when requesting symbols containing
+ //! ':', like perl(Foo::Bar). Maybe we should drop or introduce another
+ //! way to enforce repo per package.
+ (pos = str.rfind(':')) != string::npos &&
+ !(str.find("perl(") == 0)) // bnc #433679
{
repo = str.substr(0, pos);
str = str.substr(pos + 1);
--
To unsubscribe, e-mail: zypp-commit+unsubscribe@opensuse.org
For additional commands, e-mail: zypp-commit+help@opensuse.org