diff options
| author | LibreOfficiant <LibreOfficiant@sfr.fr> | 2019-05-20 16:02:11 +0200 |
|---|---|---|
| committer | Olivier Hallot <olivier.hallot@libreoffice.org> | 2019-05-20 16:11:08 +0200 |
| commit | 3218853d57b8d80192cdbf6f99acbfe8f43aab44 (patch) | |
| tree | 5dc09c49666ef7fc6ae67d5d3bcfd166b6539561 | |
| parent | 4f954243e76c64fb09489cb5f501e395bf37e6ca (diff) | |
Platform regognition for Basic language
localisation adjustments
Change-Id: Iced427fc30c0bb8fe3873f9d42e64786c863c619
Reviewed-on: https://gerrit.libreoffice.org/72603
Tested-by: Jenkins
Reviewed-by: Olivier Hallot <olivier.hallot@libreoffice.org>
| -rw-r--r-- | source/text/sbasic/python/python_platform.xhp | 9 |
1 files changed, 4 insertions, 5 deletions
diff --git a/source/text/sbasic/python/python_platform.xhp b/source/text/sbasic/python/python_platform.xhp index acad02559f..89c4f52a7b 100644 --- a/source/text/sbasic/python/python_platform.xhp +++ b/source/text/sbasic/python/python_platform.xhp @@ -74,13 +74,12 @@ <paragraph role="bascode" localize="false" id="N0548">End Property ' Platform.isWindows</paragraph> <paragraph role="bascode" localize="false" id="N0549"></paragraph> <paragraph role="bascode" localize="false" id="N0550">Public Property Get OSName As String</paragraph> - <paragraph role="bascode" localize="false" id="N0551"> ' Return platform name as "MAC", "UNIX", "WIN"</paragraph> - <paragraph role="bascode" localize="false" id="N0551"> ' Inferred from "Tools.UCB.ShowHelperDialog" function</paragraph> - <!-- <paragraph role="bascode" localize="false" id="N0552"> With GlobalScope.Basiclibraries</paragraph>--> - <paragraph role="bascode" localize="false" id="N0552"> With Basiclibraries</paragraph> <!-- to replace with line above --> + <paragraph role="bascode" xml-lang="en-US" id="N0551"> ' Return platform name as "MAC", "UNIX", "WIN"</paragraph> + <paragraph role="bascode" xml-lang="en-US" id="N0551"> ' Inferred from "Tools.UCB.ShowHelperDialog" function</paragraph> + <paragraph role="bascode" localize="false" id="N0552"> With GlobalScope.Basiclibraries</paragraph> <paragraph role="bascode" localize="false" id="M0552"> If Not .IsLibraryLoaded("Tools") Then .LoadLibrary("Tools")</paragraph> <paragraph role="bascode" localize="false" id="O0552"> End With</paragraph> - <paragraph role="bascode" localize="false" id="N0553"> Dim keyNode As Object 'com.sun.star.configuration.ConfigurationAccess</paragraph> + <paragraph role="bascode" localize="false" id="N0553"> Dim keyNode As Object ' com.sun.star.configuration.ConfigurationAccess</paragraph> <paragraph role="bascode" localize="false" id="M0553"> keyNode = Tools.Misc.GetRegistryKeyContent("org.openoffice.Office.Common/Help")</paragraph> <paragraph role="bascode" localize="false" id="N0554"> OSName = keyNode.GetByName("System")</paragraph> <paragraph role="bascode" localize="false" id="N0555">End Property ' Platform.OSName</paragraph> |