d6
/
pmacs3
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

some more arg history queues 

--HG--
branch : pmacs2
This commit is contained in:
Erik Osheim 2009-07-06 23:00:25 -04:00
parent 0ed283b5af
commit 33c5cc3cf5
2 changed files with 4 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
method/__init__.py
View File

@ -344,7 +344,8 @@ class UppercaseWord(Method):
class MetaX(Method):
'''Call pmacs functions by name (with or without arguments)'''
args = [arg('method', dt="method", p="M-x ", h='Method to execute')]
args = [arg('method', dt="method", p="M-x ", h='Method to execute',
q='metax')]
name_re = re.compile(r'[a-z0-9_-]+')
py_empty_re = re.compile(r'^\( *\)$')

3
mode/perl.py
View File

@ -295,7 +295,7 @@ class PerldocModule(PerlBase):
class Perldoc(Method):
name_re = re.compile('(?:[a-zA-Z_][a-zA-Z0-9_]*::)*[a-zA-Z_][a-zA-Z0-9_]*')
args = [arg("name", p="Perldoc: ")]
args = [arg("name", p="Perldoc: ", q='perldoc')]
def _execute(self, w, **vargs):
name = vargs['name']
if not self.name_re.match(name):
@ -634,6 +634,7 @@ class PerlOpenModule(Method):
w.application.methods['open-file'].execute(w, filename=path)
else:
w.set_error("Could not find module %r" % vargs['module'])
class PerlOpenModuleWord(Method):
namechars = string.ascii_letters + string.digits + '_'
def _execute(self, w, **vargs):