← Back to branch summary

~ubuntu-branches/ubuntu/maverick/gnat-gps/maverick

« back to all changes in this revision

Viewing changes to views/src/bookmark_views.adb

  • Committer: Bazaar Package Importer
  • Author(s): Matthias Klose
  • Date: 2010-03-15 15:12:34 UTC
  • mfrom: (10.1.3 sid)
  • Revision ID: james.westby@ubuntu.com-20100315151234-2qyonhb0vh6wxb17
Tags: 4.3-5ubuntu1
BUild on armel.

Show diffs side-by-side

added added

removed removed

Lines of Context:
views/src/bookmark_views.adb
1
1
-----------------------------------------------------------------------
2
2
--                               G P S                               --
3
3
--                                                                   --
 
4
--               Copyright (C) 2005-2009, AdaCore                    --
4
5
--                                                                   --
5
6
-- GPS is free  software;  you can redistribute it and/or modify  it --
6
7
-- under the terms of the GNU General Public License as published by --
596
596
 
597
597
      while List /= Null_Node loop
598
598
         Append (Model, Iter, Null_Iter);
599
 
         Set (Model, Iter, Icon_Column, C_Proxy (View.Goto_Icon));
 
599
         Set (Model, Iter, Icon_Column, GObject (View.Goto_Icon));
600
600
         Set (Model, Iter, Name_Column, Data (List).Name.all);
601
601
         Set (Model, Iter, Data_Column, Address => Convert (Data (List)));
602
602
         Set (Model, Iter, Editable_Column, True);