/[eiffelstudio]/branches/Eiffel_57_docking/Src/Eiffel/interface/new_graphical/windows/eb_development_window.e
ViewVC logotype

Diff of /branches/Eiffel_57_docking/Src/Eiffel/interface/new_graphical/windows/eb_development_window.e

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 61226 by patrickr, Wed Jul 12 17:14:36 2006 UTC revision 61261 by manus, Wed Jul 12 23:53:47 2006 UTC
# Line 112  inherit Line 112  inherit
112                          {NONE} All                          {NONE} All
113                  end                  end
114    
115            REFACTORING_HELPER
116                    export
117                            {NONE} all
118                    end
119    
120  create {EB_WINDOW_MANAGER}  create {EB_WINDOW_MANAGER}
121          make,          make,
122          make_with_session_data,          make_with_session_data,
# Line 243  feature {NONE} -- Initialization Line 248  feature {NONE} -- Initialization
248                                  on_project_unloaded                                  on_project_unloaded
249                          end                          end
250    
                                 -- Create feature position table  
                         create feature_positions.make (1)  
                         feature_positions.compare_objects  
   
251                          window.move_actions.force_extend (agent window_moved)                          window.move_actions.force_extend (agent window_moved)
252    
253                          initialized := True                          initialized := True
# Line 2837  feature {EB_FEATURES_TOOL, EB_FEATURES_T Line 2838  feature {EB_FEATURES_TOOL, EB_FEATURES_T
2838          feature_clauses: HASH_TABLE [ARRAYED_LIST [DOTNET_FEATURE_CLAUSE_AS [CONSUMED_ENTITY]], STRING]          feature_clauses: HASH_TABLE [ARRAYED_LIST [DOTNET_FEATURE_CLAUSE_AS [CONSUMED_ENTITY]], STRING]
2839                          -- List of features clauses for Current window hashed by the .NET name of the consumed_type.                          -- List of features clauses for Current window hashed by the .NET name of the consumed_type.
2840    
         feature_positions: HASH_TABLE [INTEGER, E_FEATURE]  
                         -- Features indexed by line position in class text (for .NET features).  
   
2841          feature_locating: BOOLEAN          feature_locating: BOOLEAN
2842                          -- Is feature tool locating a feature?                          -- Is feature tool locating a feature?
2843    
# Line 3033  feature {NONE} -- Implementation Line 3031  feature {NONE} -- Implementation
3031                                                          if changed then                                                          if changed then
3032                                                                          -- user has already chosen not to save the file                                                                          -- user has already chosen not to save the file
3033                                                                          -- do not ask again                                                                          -- do not ask again
                                                                 Feature_positions.wipe_out  
3034                                                                  editor_tool.text_area.no_save_before_next_load                                                                  editor_tool.text_area.no_save_before_next_load
3035                                                          end                                                          end
3036                                                  end                                                  end
# Line 3607  feature {NONE} -- Implementation Line 3604  feature {NONE} -- Implementation
3604                                          end                                          end
3605                                  end                                  end
3606                          else                          else
3607                                  if not managed_main_formatters.first.selected then                                          -- Nothing for .NET features for now.
3608                                          managed_main_formatters.first.execute                                  fixme ("It should be implemented.")
                                 end  
                                         -- FIXME NC: Doesn't work properly for .NET features  
                                         -- .NET formatted feature.  
                                 begin_index := feature_positions.item (feat_as)  
                                 if platform_constants.is_windows then  
                                         tmp_text := displayed_class.text.substring (1, begin_index)  
                                         offset := tmp_text.occurrences('%N')  
                                 end  
                                 editor_tool.text_area.scroll_to_when_ready (begin_index // 2) -- - offset)  
3609                          end                          end
3610                  end                  end
3611    

Legend:
Removed from v.61226  
changed lines
  Added in v.61261

  ViewVC Help
Powered by ViewVC 1.1.23