Changeset - 0142817cf293
[Not reviewed]
0 1 0
Sergey Pashinin - 11 years ago 2014-08-28 18:45:35
sergey@pashinin.com
Test renaming workgroup
1 file changed with 7 insertions and 0 deletions:
0 comments (0 inline, 0 general)
tests/workgroups2-tests.el
Show inline comments
 
@@ -61,6 +61,13 @@
 
  ;;(should-not (wg-current-workgroup))
 
  (unless (string-equal "initial_terminal" (terminal-name (selected-frame)))
 
    (should (wg-session-modified (wg-current-session))))
 

	
 
  ;; Rename
 
  (wg-rename-workgroup "asd")
 
  (should (string= (wg-mode-line-string) " [asd:**]"))
 
  (wg-rename-workgroup "First workgroup")
 
  (should (string= (wg-mode-line-string) " [First workgroup:**]"))
 

	
 
  )
 

	
 
(ert-deftest 055-structs ()
0 comments (0 inline, 0 general)