paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-08-17 03:49:30 +02:00
Code Issues Packages Projects Releases Wiki Activity

fixed file commands in designer

Browse Source 
git-svn-id: trunk@7711 -
This commit is contained in:
mattias 2005-09-15 19:49:10 +00:00
parent 96057b3ff8
commit f6cdf3cd65
3 changed files with 6 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
designer/designer.pp
View File

@ -1636,6 +1636,7 @@ Begin
Handled:=false; Handled:=false;
Command:=FTheFormEditor.TranslateKeyToDesignerCommand( Command:=FTheFormEditor.TranslateKeyToDesignerCommand(
TheMessage.CharCode,Shift); TheMessage.CharCode,Shift);
//DebugLn('TDesigner.KEYDOWN Command=',dbgs(Command));
DoProcessCommand(Self,Command,Handled); DoProcessCommand(Self,Command,Handled);
if not Handled then begin if not Handled then begin

2
ide/keymapping.pp
View File

@ -2373,7 +2373,7 @@ begin
AddDefault(C,'Go to source editor 10',ecGotoEditor0); AddDefault(C,'Go to source editor 10',ecGotoEditor0);
// file menu // file menu
C:=Categories[AddCategory('FileMenu',srkmCatFileMenu,{$IFDEF UseIDEScopes}nil{$ELSE}caSrcEdit{$ENDIF})]; C:=Categories[AddCategory('FileMenu',srkmCatFileMenu,{$IFDEF UseIDEScopes}nil{$ELSE}caAll{$ENDIF})];
AddDefault(C,'New',ecNew); AddDefault(C,'New',ecNew);
AddDefault(C,'NewUnit',ecNewUnit); AddDefault(C,'NewUnit',ecNewUnit);
AddDefault(C,'NewForm',ecNewForm); AddDefault(C,'NewForm',ecNewForm);

6
tools/install/rpm/fpc.spec.template
View File

@ -90,11 +90,11 @@ NEWPP=`pwd`/compiler/%{ppcname}
INSTALLOPTS="FPC=${NEWPP} FPCMAKE=${FPCMAKE} \ INSTALLOPTS="FPC=${NEWPP} FPCMAKE=${FPCMAKE} \
INSTALL_PREFIX=%{buildroot}%{_prefix} \ INSTALL_PREFIX=%{buildroot}%{_prefix} \
INSTALL_LIBDIR=%{buildroot}%{_libdir} \ INSTALL_LIBDIR=%{buildroot}%{_libdir} \
INSTALL_BASEDIR=%{buildroot}%{_libdir}/%{name}/%{version} \ INSTALL_BASEDIR=%{buildroot}%{_libdir}/%{name}/%{version} \
CODPATH=%{buildroot}%{_libdir}/%{name}/lexyacc \ CODPATH=%{buildroot}%{_libdir}/%{name}/lexyacc \
INSTALL_DOCDIR=%{buildroot}%{_defaultdocdir}/%{name}-%{version} \ INSTALL_DOCDIR=%{buildroot}%{_defaultdocdir}/%{name}-%{version} \
INSTALL_BINDIR=%{buildroot}%{_bindir} INSTALL_BINDIR=%{buildroot}%{_bindir}
INSTALL_EXAMPLEDIR=%{buildroot}%{_defaultdocdir}/%{name}-%{version}/examples" INSTALL_EXAMPLEDIR=%{buildroot}%{_defaultdocdir}/%{name}-%{version}/examples"
make compiler_install ${INSTALLOPTS} make compiler_install ${INSTALLOPTS}
make rtl_install ${INSTALLOPTS} make rtl_install ${INSTALLOPTS}
make packages_install ${INSTALLOPTS} make packages_install ${INSTALLOPTS}