From 3d5ee901b755d83c5a2df132c5be9141dd13f831 Mon Sep 17 00:00:00 2001 From: Pascal Packaging Team Date: Wed, 8 Feb 2017 09:53:35 +0000 Subject: [PATCH] fix-spell-errors Gbp-Pq: Name fix-spell-errors.patch --- fpcsrc/ide/fp.pas | 2 +- fpcsrc/ide/fphelp.pas | 4 ++-- fpcsrc/ide/wconstse.inc | 2 +- fpcsrc/packages/cdrom/src/fpcddb.pp | 2 +- fpcsrc/packages/fcl-db/src/base/dbconst.pas | 2 +- fpcsrc/packages/fcl-db/src/sqlite/sqliteds.pas | 2 +- fpcsrc/packages/fcl-net/src/httpsvlt.pp | 2 +- fpcsrc/packages/fcl-sdo/src/base/sdo_consts.pas | 2 +- fpcsrc/packages/fcl-sdo/src/base/sdo_xpath_helper.pas | 2 +- fpcsrc/packages/fcl-xml/src/xmltextreader.pp | 2 +- fpcsrc/packages/fcl-xml/tests/testgen.pp | 2 +- fpcsrc/packages/fv/src/editors.pas | 2 +- fpcsrc/packages/fv/src/strtxt.inc | 2 +- fpcsrc/rtl/macos/system.pp | 2 +- fpcsrc/rtl/objpas/sysconst.pp | 2 +- fpcsrc/utils/delp.pp | 2 +- fpcsrc/utils/fpdoc/dglobals.pp | 2 +- fpcsrc/utils/fpdoc/dwriter.pp | 2 +- fpcsrc/utils/fpdoc/fpclasschart.pp | 2 +- fpcsrc/utils/fpdoc/makeskel.pp | 2 +- fpcsrc/utils/fpdoc/unitdiff.pp | 2 +- install/man/man1/fp.1 | 2 +- install/man/man1/fpdoc.1 | 4 ++-- install/man/man1/grab_vcsa.1 | 2 +- install/man/man1/h2pas.1 | 2 +- install/man/man1/pas2jni.1 | 2 +- install/man/man1/ppdep.1 | 2 +- 27 files changed, 29 insertions(+), 29 deletions(-) diff --git a/fpcsrc/ide/fp.pas b/fpcsrc/ide/fp.pas index f1de80bf..005ff19f 100644 --- a/fpcsrc/ide/fp.pas +++ b/fpcsrc/ide/fp.pas @@ -500,7 +500,7 @@ BEGIN end; if ideapp.displaymode=dmUser then begin - writeln('Fatal exception occured while in user screen mode. File save message boxes'); + writeln('Fatal exception occurred while in user screen mode. File save message boxes'); writeln('cannot be displayed. We are sorry, but need to terminate now.'); halt(255); end; diff --git a/fpcsrc/ide/fphelp.pas b/fpcsrc/ide/fphelp.pas index 3315790e..f5bc3121 100644 --- a/fpcsrc/ide/fphelp.pas +++ b/fpcsrc/ide/fphelp.pas @@ -96,7 +96,7 @@ const hint_systemmenu = 'System menu'; hint_update = 'Refresh and redraw display'; hint_about = 'Show version and copyright information'; - hint_filemenu = 'File managment commands (Open, New, Save, etc.)'; + hint_filemenu = 'File management commands (Open, New, Save, etc.)'; hint_filenew = 'Create a new file in a new edit window'; hint_filenewfromtemplate='Create a new file using a code template'; hint_fileopen = 'Locate and open a file in an edit window'; @@ -204,7 +204,7 @@ const hint_openini = 'Load a previously saved options file'; hint_saveini = 'Save all the changes made in the options menu'; hint_saveasini = 'Save all the changes made under a different name'; - hint_windowmenu = 'Windows managment commands'; + hint_windowmenu = 'Windows management commands'; hint_tile = 'Arrange windows on desktop by tiling'; hint_cascade = 'Arrange windows on desktop by cascading'; hint_closeall = 'Close all windows on the desktop'; diff --git a/fpcsrc/ide/wconstse.inc b/fpcsrc/ide/wconstse.inc index 81ec61df..e67fa85e 100644 --- a/fpcsrc/ide/wconstse.inc +++ b/fpcsrc/ide/wconstse.inc @@ -90,7 +90,7 @@ label_name = '~N~ame'; msg_searchstringnotfound = 'Search string not found.'; - msg_replacethisoccourence = 'Replace this occurence?'; + msg_replacethisoccourence = 'Replace this occurrence?'; msg_fileexistsoverwrite = 'File %s already exists. Overwrite?'; msg_readingwinclipboard = 'Reading windows clipboard'; msg_copyingwinclipboard = 'Copying to windows clipboard'; diff --git a/fpcsrc/packages/cdrom/src/fpcddb.pp b/fpcsrc/packages/cdrom/src/fpcddb.pp index 2ab085be..2da43fa2 100644 --- a/fpcsrc/packages/cdrom/src/fpcddb.pp +++ b/fpcsrc/packages/cdrom/src/fpcddb.pp @@ -184,7 +184,7 @@ implementation Resourcestring SErrNoDisk = 'No disk active'; SErrInvalidTrackNo = 'Invalid track number: %d'; - SErrParsingLine = 'An error occured while parsing line %d of the response: %s'; + SErrParsingLine = 'An error occurred while parsing line %d of the response: %s'; SErrCDDBResponse = 'CDDB error in command response: %s'; function DiscIDToStr(ID: Integer): String; diff --git a/fpcsrc/packages/fcl-db/src/base/dbconst.pas b/fpcsrc/packages/fcl-db/src/base/dbconst.pas index 7a575c65..fdf0376a 100644 --- a/fpcsrc/packages/fcl-db/src/base/dbconst.pas +++ b/fpcsrc/packages/fcl-db/src/base/dbconst.pas @@ -87,7 +87,7 @@ Resourcestring SInvalidSearchFieldType = 'Searching in fields of type %s is not supported'; SDatasetEmpty = 'The dataset is empty'; SFieldIsNull = 'The field is null'; - SOnUpdateError = 'An error occured while applying the updates in a record: %s'; + SOnUpdateError = 'An error occurred while applying the updates in a record: %s'; SApplyRecNotSupported = 'Applying updates is not supported by this TDataset descendent'; SNoWhereFields = 'No %s query specified and failed to generate one. (No fields for inclusion in where statement found)'; SNoUpdateFields = 'No %s query specified and failed to generate one. (No fields found for insert- or update-statement found)'; diff --git a/fpcsrc/packages/fcl-db/src/sqlite/sqliteds.pas b/fpcsrc/packages/fcl-db/src/sqlite/sqliteds.pas index 66e7ffed..10442724 100644 --- a/fpcsrc/packages/fcl-db/src/sqlite/sqliteds.pas +++ b/fpcsrc/packages/fcl-db/src/sqlite/sqliteds.pas @@ -321,7 +321,7 @@ begin Exit; end; else - Result := 'Unknow Return Value'; + Result := 'Unknown Return Value'; end; Result := Result + ' - ' + sqlite_error_string(FReturnCode); end; diff --git a/fpcsrc/packages/fcl-net/src/httpsvlt.pp b/fpcsrc/packages/fcl-net/src/httpsvlt.pp index 24364711..84db0774 100644 --- a/fpcsrc/packages/fcl-net/src/httpsvlt.pp +++ b/fpcsrc/packages/fcl-net/src/httpsvlt.pp @@ -478,7 +478,7 @@ begin except on e: Exception do begin - s := 'An error occured: ' + ' ' + e.Message; + s := 'An error occurred: ' + ' ' + e.Message; ResponseHeader.ContentType := 'text/plain'; ResponseStream.Write(s[1], Length(s)); end; diff --git a/fpcsrc/packages/fcl-sdo/src/base/sdo_consts.pas b/fpcsrc/packages/fcl-sdo/src/base/sdo_consts.pas index 506f71d0..5ad96d27 100644 --- a/fpcsrc/packages/fcl-sdo/src/base/sdo_consts.pas +++ b/fpcsrc/packages/fcl-sdo/src/base/sdo_consts.pas @@ -117,7 +117,7 @@ resourcestring SERR_OperationNotAllowedOnActivePool = 'Operation not allowed on an active pool.'; SERR_ParamaterNotFound = 'Parameter non found : "%s".'; SERR_Parsing = 'Parsing "%s" ...'; - SERR_RecordExtendedRttiNotFound = 'Record extended RTTI informations not found in type registry : "%s".'; + SERR_RecordExtendedRttiNotFound = 'Record extended RTTI information not found in type registry : "%s".'; SERR_RootObjectCannotBeNIL = 'The root object cannot be NIL.'; SERR_SchemaNodeRequiredAttribute = 'The Schema node must have at least the "%s" attribute.'; SERR_SerializerInitializationException = 'Unable to initialize the serializer of that type : "%s".'; diff --git a/fpcsrc/packages/fcl-sdo/src/base/sdo_xpath_helper.pas b/fpcsrc/packages/fcl-sdo/src/base/sdo_xpath_helper.pas index e0b91be7..56085536 100644 --- a/fpcsrc/packages/fcl-sdo/src/base/sdo_xpath_helper.pas +++ b/fpcsrc/packages/fcl-sdo/src/base/sdo_xpath_helper.pas @@ -1085,7 +1085,7 @@ var locTmpNode := FTermStack.Pop() as TXPathNode; if not locTmpNode.InheritsFrom(TXPathRigthSquareBraketNode) then begin FTermStack.Push(locTmpNode); - raise EXpathException.Create('Predicate begining expected.'); + raise EXpathException.Create('Predicate beginning expected.'); end; FreeAndNil(locTmpNode); locExp := FTermStack.Pop() as TXPathNode; diff --git a/fpcsrc/packages/fcl-xml/src/xmltextreader.pp b/fpcsrc/packages/fcl-xml/src/xmltextreader.pp index 644fbd15..9f7f60a4 100644 --- a/fpcsrc/packages/fcl-xml/src/xmltextreader.pp +++ b/fpcsrc/packages/fcl-xml/src/xmltextreader.pp @@ -2208,7 +2208,7 @@ begin SkipWhitespace; CheckName([cnToken]); if not AttDef.AddEnumToken(FName.Buffer, FName.Length) then - ValidationError('Duplicate token in enumerated attibute declaration', [], FName.Length); + ValidationError('Duplicate token in enumerated attribute declaration', [], FName.Length); SkipWhitespace; until not CheckForChar('|'); ExpectChar(')'); diff --git a/fpcsrc/packages/fcl-xml/tests/testgen.pp b/fpcsrc/packages/fcl-xml/tests/testgen.pp index 3a6bfcc1..c0420351 100644 --- a/fpcsrc/packages/fcl-xml/tests/testgen.pp +++ b/fpcsrc/packages/fcl-xml/tests/testgen.pp @@ -932,7 +932,7 @@ begin try ConvertTest(root, sl); except - Writeln('An exception occured while converting ', casename); + Writeln('An exception occurred while converting ', casename); raise; end; if sl.Count > 0 then diff --git a/fpcsrc/packages/fv/src/editors.pas b/fpcsrc/packages/fv/src/editors.pas index 4503b835..11ca11b2 100644 --- a/fpcsrc/packages/fv/src/editors.pas +++ b/fpcsrc/packages/fv/src/editors.pas @@ -428,7 +428,7 @@ resourcestring sClipboard='Clipboard'; sReformatNotPossible='Paragraph reformat not possible while trying to wrap current line with current margins.'; sReformattingTheDocument='Reformatting the document:'; sReplaceNotPossible='Wordwrap on: Replace not possible in current margins when at end of line.'; - sReplaceThisOccurence='Replace this occurence?'; + sReplaceThisOccurence='Replace this occurrence?'; sRightMargin='Right Margin'; sSearchStringNotFound='Search string not found.'; sSelectWhereToBegin='Please select where to begin.'; diff --git a/fpcsrc/packages/fv/src/strtxt.inc b/fpcsrc/packages/fv/src/strtxt.inc index 361b1b98..cb2164f9 100644 --- a/fpcsrc/packages/fv/src/strtxt.inc +++ b/fpcsrc/packages/fv/src/strtxt.inc @@ -75,7 +75,7 @@ const standard_string_count=107; (nr:sReplace;text:'Replace'), (nr:sReplaceFile;text:'Replace file?'#13#10#13#3'%s'), (nr:sReplaceNotPossible;text:'Wordwrap on: Replace not possible in current margins when at end of line.'), - (nr:sReplaceThisOccurence;text:'Replace this occurence?'), + (nr:sReplaceThisOccurence;text:'Replace this occurrence?'), (nr:sRightMargin;text:'Right Margin'), (nr:sSaveAs;text:'Save As'), (nr:sScrollbarIcons;text:'Scroll bar icons'), diff --git a/fpcsrc/rtl/macos/system.pp b/fpcsrc/rtl/macos/system.pp index 54d2b00f..72e0b2a4 100644 --- a/fpcsrc/rtl/macos/system.pp +++ b/fpcsrc/rtl/macos/system.pp @@ -450,7 +450,7 @@ begin if IsConsole then Writeln( '### Program exited with exit code ' + s) else if macosHasSysDebugger then - DebugStr('A possible error occured, exit code: ' + s + '. Type "g" and return to continue.') + DebugStr('A possible error occurred, exit code: ' + s + '. Type "g" and return to continue.') else {Be quiet} end; diff --git a/fpcsrc/rtl/objpas/sysconst.pp b/fpcsrc/rtl/objpas/sysconst.pp index b7456ea4..a6f8ef46 100644 --- a/fpcsrc/rtl/objpas/sysconst.pp +++ b/fpcsrc/rtl/objpas/sysconst.pp @@ -120,7 +120,7 @@ resourcestring SVarUnexpected = 'Unexpected variant error'; SZeroDivide = 'Floating point division by zero'; - SFallbackError = 'An error, whose error code is larger than can be returned to the OS, has occured'; + SFallbackError = 'An error, whose error code is larger than can be returned to the OS, has occurred'; SNoToolserver = 'Toolserver is not installed, cannot execute Tool'; diff --git a/fpcsrc/utils/delp.pp b/fpcsrc/utils/delp.pp index 4f893443..9664b4bb 100644 --- a/fpcsrc/utils/delp.pp +++ b/fpcsrc/utils/delp.pp @@ -167,7 +167,7 @@ begin writeln(' -r Recurse into directories.'); writeln(' -n Do not actually delete files.'); writeln(' -m N Maximum depth to recurse into directories (1 based, zero is no max).'); - writeln(' -q Quietly perfoms deleting.'); + writeln(' -q Quietly performs deleting.'); writeln(' -v Verbose (print names of deleted files).'); Halt(1); end; diff --git a/fpcsrc/utils/fpdoc/dglobals.pp b/fpcsrc/utils/fpdoc/dglobals.pp index 5884bda9..5ef5af83 100644 --- a/fpcsrc/utils/fpdoc/dglobals.pp +++ b/fpcsrc/utils/fpdoc/dglobals.pp @@ -159,7 +159,7 @@ resourcestring SUsageOption140 = '--lang=lng Select output language.'; SUsageOption150 = '--ostarget=value Set the target OS for the scanner.'; SUsageOption160 = '--output=name use name as the output name.'; - SUsageOption170 = ' Each backend interpretes this as needed.'; + SUsageOption170 = ' Each backend interprets this as needed.'; SUsageOption180 = '--package=name Set the package name for which to create output,'; SUsageOption190 = ' e.g. --package=fcl'; SUsageOption200 = '--project=file Use file as project file'; diff --git a/fpcsrc/utils/fpdoc/dwriter.pp b/fpcsrc/utils/fpdoc/dwriter.pp index f0fe1de8..02de0304 100644 --- a/fpcsrc/utils/fpdoc/dwriter.pp +++ b/fpcsrc/utils/fpdoc/dwriter.pp @@ -28,7 +28,7 @@ interface uses Classes, DOM, dGlobals, PasTree, SysUtils; resourcestring - SErrFileWriting = 'An error occured during writing of file "%s": %s'; + SErrFileWriting = 'An error occurred during writing of file "%s": %s'; SErrInvalidShortDescr = 'Invalid short description'; SErrInvalidDescr = 'Invalid description (illegal XML element: "%s")'; diff --git a/fpcsrc/utils/fpdoc/fpclasschart.pp b/fpcsrc/utils/fpdoc/fpclasschart.pp index 3cb7bcd8..a3a68f64 100644 --- a/fpcsrc/utils/fpdoc/fpclasschart.pp +++ b/fpcsrc/utils/fpdoc/fpclasschart.pp @@ -714,7 +714,7 @@ begin if FileExists(MOFilename) then gettext.TranslateResourceStrings(MoFileName) else - writeln('NOTE: unable to find tranlation file ',MOFilename); + writeln('NOTE: unable to find translation file ',MOFilename); // Translate internal documentation strings TranslateDocStrings(DocLang); end; diff --git a/fpcsrc/utils/fpdoc/makeskel.pp b/fpcsrc/utils/fpdoc/makeskel.pp index d68e7921..3c5a9b7a 100644 --- a/fpcsrc/utils/fpdoc/makeskel.pp +++ b/fpcsrc/utils/fpdoc/makeskel.pp @@ -588,7 +588,7 @@ begin if FileExists(MOFilename) then gettext.TranslateResourceStrings(MoFileName) else - writeln('NOTE: unable to find tranlation file ',MOFilename); + writeln('NOTE: unable to find translation file ',MOFilename); // Translate internal documentation strings TranslateDocStrings(DocLang); end; diff --git a/fpcsrc/utils/fpdoc/unitdiff.pp b/fpcsrc/utils/fpdoc/unitdiff.pp index da638f32..a7259cb4 100644 --- a/fpcsrc/utils/fpdoc/unitdiff.pp +++ b/fpcsrc/utils/fpdoc/unitdiff.pp @@ -189,7 +189,7 @@ begin if FileExists(MOFilename) then gettext.TranslateResourceStrings(MoFileName) else - writeln('NOTE: unable to find tranlation file ',MOFilename); + writeln('NOTE: unable to find translation file ',MOFilename); // Translate internal documentation strings TranslateDocStrings(DocLang); end; diff --git a/install/man/man1/fp.1 b/install/man/man1/fp.1 index c7fc6ba6..7e164a58 100644 --- a/install/man/man1/fp.1 +++ b/install/man/man1/fp.1 @@ -49,7 +49,7 @@ on-line help system and a debugger. A text mode windowing system is the base of the user interface. The mouse is supported, but most people will use the keyboard. The user will usually open a few text editor -windows in which he will design his program, during which he can regularily check and +windows in which he will design his program, during which he can regularly check and debug through the use of hot keys. The high speed of the compiler ensures that programmers can do this often and therefore allows speedy development of code. diff --git a/install/man/man1/fpdoc.1 b/install/man/man1/fpdoc.1 index 3104ef93..0aacf10c 100644 --- a/install/man/man1/fpdoc.1 +++ b/install/man/man1/fpdoc.1 @@ -43,7 +43,7 @@ option. .BI \-\-cputarget=value This option tells .B fpdoc -for which CPU to generate documentation. This simply defines the approriate CPU macros. +for which CPU to generate documentation. This simply defines the appropriate CPU macros. .TP .BI \-\-descr=descfile This option specifies the name of a description file @@ -190,7 +190,7 @@ where to look for the translation files that can be used to internationalize fp .BI \-\-ostarget=value This option tells .B fpdoc -for which operating system to generate documentation. This simply defines the approriate operating system macros. +for which operating system to generate documentation. This simply defines the appropriate operating system macros. .TP .BI \-\-output=name This option tells diff --git a/install/man/man1/grab_vcsa.1 b/install/man/man1/grab_vcsa.1 index 9f5e949a..7404c90a 100644 --- a/install/man/man1/grab_vcsa.1 +++ b/install/man/man1/grab_vcsa.1 @@ -37,7 +37,7 @@ work). The permissions are automatically reverted on logout. .B grab_vcsa is used by the Free Pascal video unit. The video unit allows programmers to -develop portable programs accross Dos, Linux, FreeBSD, Windows, OS/2 and +develop portable programs across Dos, Linux, FreeBSD, Windows, OS/2 and other operating systems while they can still assume being able to use the full VGA character set. diff --git a/install/man/man1/h2pas.1 b/install/man/man1/h2pas.1 index 1d7c1df4..94fae831 100644 --- a/install/man/man1/h2pas.1 +++ b/install/man/man1/h2pas.1 @@ -101,7 +101,7 @@ macros are changed - wherever possible to functions; however the arguments are all integers, so these must be changed manually. Simple expressions in define staments are recognized, as are most arithmetic operators: addition, substraction, multiplication, division, logical operators, -comparision operators, shift operators. The C construct ( A ? B : C) +comparison operators, shift operators. The C construct ( A ? B : C) is also recognized and translated to a pascal construct with an IF statement (this is buggy, however). diff --git a/install/man/man1/pas2jni.1 b/install/man/man1/pas2jni.1 index cfea4500..7b053a63 100644 --- a/install/man/man1/pas2jni.1 +++ b/install/man/man1/pas2jni.1 @@ -9,7 +9,7 @@ pas2jni - Free Pascal Java Native Interface generation tool Generate a Java native interface description and library from compiled Free Pascal units. pas2jni generates per unit 2 files: a library that provides access to the functions and procedures in the pascal unit in a manner that Java understands, and a .java file that -describes the library, and can be used to access the libary from Java. +describes the library, and can be used to access the library from Java. .SH OPTIONS .TP diff --git a/install/man/man1/ppdep.1 b/install/man/man1/ppdep.1 index f773b495..24ea8bc2 100644 --- a/install/man/man1/ppdep.1 +++ b/install/man/man1/ppdep.1 @@ -20,7 +20,7 @@ implementation section of the unit, and it can handle conditional defines. You can invoke .B ppdep with as the only required argument the name of the -file (program or unit) whose dependecies you wish to list. You don't need +file (program or unit) whose dependencies you wish to list. You don't need to specify an extension, by default .B .pp is assumed. -- 2.30.2