def discover(directory):
directory = os.path.expanduser(
directory) # The tilde does not work with os.chdir
os.chdir(directory)
# Discovering tests using unittest framework
loader = TestLoader()
tests = loader.discover(directory, top_level_dir=directory)
result = EmacsTestResult()
# Create a buffer (if it not exists) and put the formatted results
# inside it
let = Let()
lisp.get_buffer_create("unittest")
let.push_excursion()
lisp.set_buffer("unittest")
lisp.erase_buffer()
tests.run(result)
lisp.insert("\n")
lisp.insert("Errors:\n")
for test, traceback in result.errors:
lisp.insert(str(test))
lisp.insert(traceback)
let.pop_excursion()
lisp.pop_to_buffer("unittest")
lisp.compilation_mode()
lisp.beginning_of_buffer()
def discover(directory):
directory = os.path.expanduser(directory) # The tilde does not work with os.chdir
os.chdir(directory)
# Discovering tests using unittest framework
loader = TestLoader()
tests = loader.discover(directory, top_level_dir=directory)
result = EmacsTestResult()
# Create a buffer (if it not exists) and put the formatted results
# inside it
let = Let()
lisp.get_buffer_create("unittest")
let.push_excursion()
lisp.set_buffer("unittest")
lisp.erase_buffer()
tests.run(result)
lisp.insert("\n")
lisp.insert("Errors:\n")
for test, traceback in result.errors:
lisp.insert(str(test))
lisp.insert(traceback)
let.pop_excursion()
lisp.pop_to_buffer("unittest")
lisp.compilation_mode()
lisp.beginning_of_buffer()
def get_buffer_content_prev(bend):
where_am_i = lisp.point()
lisp.beginning_of_buffer()
st = lisp.point()
s = lisp.buffer_substring(st, bend)
lisp.goto_char(where_am_i)
return s
def genall():
remem = lisp.point()
lisp.beginning_of_buffer()
res = True
while res:
res = lisp.re_search_forward("$$[[:ascii:][:nonascii:]]*?$$",None,lisp.t)
lisp.backward_char(3)
show()
lisp.goto_char(remem)
def genall():
remem = lisp.point()
lisp.beginning_of_buffer()
res = True
while res:
res = lisp.re_search_forward("$$[[:ascii:][:nonascii:]]*?$$", None,
lisp.t)
lisp.backward_char(3)
show()
lisp.goto_char(remem)
def get_buffer_content_prev(bend):
where_am_i = lisp.point()
lisp.beginning_of_buffer(); st = lisp.point()
s = lisp.buffer_substring(st,bend)
lisp.goto_char(where_am_i)
return s
