1
0
mirror of https://github.com/openSUSE/osc.git synced 2025-01-11 16:36:14 +01:00

osc se Foo::Bar shortcut for osc se --package perl-Foo-Bar

This commit is contained in:
Juergen Weigert 2010-11-12 23:55:11 +01:00
parent dc49a7ebb2
commit 805d9f9bf7
2 changed files with 12 additions and 1 deletions

2
NEWS
View File

@ -1,3 +1,5 @@
- support added for osc search 'perl(Foo::Bar)'
0.130
- New "service" command to run source services locally or trigger a re-run on the server.
- setlinkrev is setting now the revision to xsrcmd5 by default to avoid later breakage on indirect links by default.

View File

@ -4939,7 +4939,7 @@ Please submit there instead, or use --nodevelproject to force direct submission.
osc search \'search term\' <options>
osc sm \'source package name\' ('osc search --maintained')
osc bse ... ('osc search --binary')
osc se ...
osc se 'perl(Foo::Bar)' ('osc --package perl-Foo-Bar')
${cmd_option_list}
"""
def build_xpath(attr, what, substr = False):
@ -4948,6 +4948,15 @@ Please submit there instead, or use --nodevelproject to force direct submission.
else:
return '%s = \'%s\'' % (attr, what)
# support perl package names and symbols:
if re.match('^\w+(::\w+)+$', search_term):
search_term = 'perl-' + re.sub('::','-', search_term)
opts.package = True
if re.match('^perl\(\w+(::\w+)*\)$', search_term):
search_term = re.sub('\)','', re.sub('(::|\()','-', search_term))
opts.package = True
if opts.mine:
opts.bugowner = True
opts.package = True