;; TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE
;; SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
-;; $Id: gtktypes.lisp,v 1.61 2008-01-02 16:00:22 espen Exp $
+;; $Id: gtktypes.lisp,v 1.63 2008-04-11 18:40:23 espen Exp $
(in-package "GTK")
:allocation :virtual
:getter "gtk_tree_view_get_columns"
:reader tree-view-columns
- :type (glist tree-view-column))
+ :type (glist (copy-of tree-view-column)))
(selection
:allocation :virtual
:getter "gtk_tree_view_get_selection"
((previous-alpha
:allocation :virtual
:getter "gtk_color_selection_get_previous_alpha"
- :setter "gtk_color_selection_get_previous_alpha"
+ :setter "gtk_color_selection_set_previous_alpha"
:initarg :previous-alpha
:accessor color-selection-previous-alpha
:type (unsigned 16))
(previous-color
:allocation :virtual
- :getter "gtk_color_selection_get_previous_color"
- :setter "gtk_color_selection_get_previous_color"
+ :getter color-selection-previous-color
+ :setter "gtk_color_selection_set_previous_color"
:initarg :previous-color
- :accessor color-selection-previous-color
+ :writer (setf color-selection-previous-color)
:type gdk:color)))
("GtkFontSelection"
(markup-column
:allocation :virtual
:getter %icon-view-get-markup-column
- :setter %icon-view-set-tmarkup-column
+ :setter %icon-view-set-markup-column
:boundp %icon-view-markup-column-boundp
:initarg :markup-column
:accessor icon-view-markup-column)