Changeset - ec2a94810d3b
[Not reviewed]
0 2 0
Sergey Pashinin - 12 years ago 2014-03-11 21:53:12
sergey@pashinin.com
Hints to test workgroup parameters set/get
2 files changed with 6 insertions and 1 deletions:
0 comments (0 inline, 0 general)
src/workgroups-functions.el
Show inline comments
 
@@ -649,7 +649,11 @@ If OBJ is nil, return the current workgroup, or error unless NOERROR."
 

	
 

	
 
;;; workgroup parameters
 

	
 
;;
 
;; Quick test:
 
;; (wg-workgroup-parameters (wg-current-workgroup))
 
;; (wg-set-workgroup-parameter (wg-current-workgroup) 'test1 t)
 
;; (wg-workgroup-parameter (wg-current-workgroup) 'test1)
 
(defun wg-workgroup-parameter (workgroup parameter &optional default)
 
  "Return WORKGROUP's value for PARAMETER.
 
If PARAMETER is not found, return DEFAULT which defaults to nil.
src/workgroups-structs.el
Show inline comments
 
@@ -12,6 +12,7 @@
 
;; (wg-session-... (wg-current-session))
 
;; Like:
 
;; (wg-session-file-name (wg-current-session))
 
;; (wg-workgroup-parameters (wg-current-workgroup))
 
;;
 
;; To set a value (in `wg-write-session-file'):
 
;;
0 comments (0 inline, 0 general)