/[eiffelstudio]/branches/Eiffel_57_docking/Src/Eiffel/interface/new_graphical/commands/eb_redo_diagram_command.e
ViewVC logotype

Annotation of /branches/Eiffel_57_docking/Src/Eiffel/interface/new_graphical/commands/eb_redo_diagram_command.e

Parent Directory Parent Directory | Revision Log Revision Log


Revision 62171 - (hide annotations)
Tue Aug 1 01:27:17 2006 UTC (13 years, 5 months ago) by larryl
File size: 2899 byte(s)
First commit docking tabbed Eiffel Studio.
1 manus 26913 indexing
2     description : "Command to redo diagram commands."
3 manus 56535 legal: "See notice at end of class."
4     status: "See notice at end of class."
5 manus 26913 date : "$Date$"
6     revision : "$Revision$"
7    
8     class
9     EB_REDO_DIAGRAM_COMMAND
10    
11     inherit
12     EB_CONTEXT_DIAGRAM_COMMAND
13 bennob 47772 redefine
14     initialize
15     end
16 manus 26913
17     create
18     make
19 king 56753
20 bennob 47772 feature {NONE} -- Initialization
21 king 56753
22 bennob 47772 initialize is
23     -- Initialize default values.
24     do
25     create accelerator.make_with_key_combination (
26 king 56753 create {EV_KEY}.make_with_code ({EV_KEY_CONSTANTS}.key_y),
27 bennob 47772 True, False, False)
28     accelerator.actions.extend (agent execute)
29     end
30 manus 26913
31     feature -- Basic operations
32    
33     execute is
34     -- Perform operation.
35     do
36 bennob 47772 if is_sensitive then
37     history.redo
38     end
39 manus 26913 end
40    
41 larryl 62171 feature {EB_DEVELOPMENT_WINDOW_MAIN_BUILDER} -- Accelerator action
42 manus 26913
43     on_ctrl_y is
44     -- Redo last cancelled action if possible and if the diagram
45     -- has the focus.
46     do
47 etienne 26940 if is_sensitive and then tool.projector.widget.has_focus and then not history.redo_exhausted then
48 manus 26913 execute
49     end
50     end
51    
52     feature {NONE} -- Implementation
53    
54 king 56753 pixmap: EV_PIXMAP is
55     -- Pixmap representing the command.
56 manus 26913 do
57 paulb 60024 Result := pixmaps.icon_pixmaps.general_redo_icon
58 manus 26913 end
59    
60 larryl 62171 pixel_buffer: EV_PIXEL_BUFFER is
61     -- Pixel buffer representing the command.
62     do
63     Result := pixmaps.icon_pixmaps.general_redo_icon_buffer
64     end
65    
66 manus 26913 tooltip: STRING is
67     -- Tooltip for the toolbar button.
68     do
69 etienne 27345 Result := Interface_names.f_diagram_redo
70 manus 26913 end
71    
72 manus 56535 name: STRING is "Redo_command";
73 manus 26913 -- Name of the command. Used to store the command in the
74     -- preferences.
75    
76 manus 56535 indexing
77     copyright: "Copyright (c) 1984-2006, Eiffel Software"
78 manus 58027 license: "GPL version 2 (see http://www.eiffel.com/licensing/gpl.txt)"
79 manus 56535 licensing_options: "http://www.eiffel.com/licensing"
80     copying: "[
81     This file is part of Eiffel Software's Eiffel Development Environment.
82    
83     Eiffel Software's Eiffel Development Environment is free
84     software; you can redistribute it and/or modify it under
85     the terms of the GNU General Public License as published
86     by the Free Software Foundation, version 2 of the License
87     (available at the URL listed under "license" above).
88    
89     Eiffel Software's Eiffel Development Environment is
90     distributed in the hope that it will be useful, but
91     WITHOUT ANY WARRANTY; without even the implied warranty
92     of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
93     See the GNU General Public License for more details.
94    
95     You should have received a copy of the GNU General Public
96     License along with Eiffel Software's Eiffel Development
97     Environment; if not, write to the Free Software Foundation,
98     Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA
99     ]"
100     source: "[
101     Eiffel Software
102     356 Storke Road, Goleta, CA 93117 USA
103     Telephone 805-685-1006, Fax 805-685-6869
104     Website http://www.eiffel.com
105     Customer support http://support.eiffel.com
106     ]"
107    
108 manus 26913 end -- class EB_REDO_DIAGRAM_COMMAND

Properties

Name Value
svn:eol-style native
svn:keywords Author Date Id Revision

  ViewVC Help
Powered by ViewVC 1.1.23