repos
/
kde.ui
/ annotate_shade
summary
|
shortlog
|
log
|
tree
|
commit
|
commitdiff
|
headdiff
|
annotate
|
headblob
|
headfilediff
|
filehistory
normal
|
plain
|
shade
|
zebra
cleanup: remove static-call
Annotate for file src/standard-action.lisp
2010-04-03 tobias
1
(in-package :kde)
2009-04-05 tobias
2
2010-04-03 tobias
3
(defun make-standard-action (action action-collection &optional slot)
2009-04-05 tobias
4
"Adds the standard-action ACTION to ACTION-COLLECTION and connects
15:36:16 '
5
the \"triggered()\" signal to SLOT when specified."
2009-05-24 tobias
6
(let ((std-action (standard-action.create action
2010-04-03 tobias
7
(null-pointer)
17:29:08 '
8
(null-pointer)
'
9
action-collection)))
2009-04-05 tobias
10
(when slot
15:36:16 '
11
(qt:connect (qt:get-signal std-action "triggered()")
'
12
slot))
'
13
std-action))