From 9be45efd580a6177315b848e0ff226a4c8070f2e Mon Sep 17 00:00:00 2001 From: Adolfo Jayme Barrientos Date: Thu, 5 Mar 2020 16:29:35 -0600 Subject: [PATCH] Fix a couple of product names Change-Id: I7d1fffadc0bcaec4ec9e9d43c9d9bb3351d570b7 --- source/text/sbasic/python/python_platform.xhp | 2 +- source/text/sbasic/shared/property.xhp | 6 +++--- 2 files changed, 4 insertions(+), 4 deletions(-) diff --git a/source/text/sbasic/python/python_platform.xhp b/source/text/sbasic/python/python_platform.xhp index 95792c229d..364e067f3b 100644 --- a/source/text/sbasic/python/python_platform.xhp +++ b/source/text/sbasic/python/python_platform.xhp @@ -62,7 +62,7 @@ End Property ' Platform.DirSeparator Public Property Get IsLinux As Boolean - isLinux = ( GetGUIType()=4 ) ' Applies to MacOS X as well + isLinux = ( GetGUIType()=4 ) ' Applies to macOS as well End Property ' Platform.isLinux Public Property Get IsMacOSX As Boolean diff --git a/source/text/sbasic/shared/property.xhp b/source/text/sbasic/shared/property.xhp index 1a4cfd3d1f..052c25affe 100644 --- a/source/text/sbasic/shared/property.xhp +++ b/source/text/sbasic/shared/property.xhp @@ -40,7 +40,7 @@ Option Compatible Sub Main ProductName = "Office" - Print ProductName ' displays "LibreOffice" + Print ProductName ' displays "%PRODUCTNAME" End Sub Private _office As String @@ -58,7 +58,7 @@ Static this As String If this = "" Then : Select Case GetGuiType() Case 1 : this = ";" ' Windows - Case 4 : this = ":" ' Linux or MacOS X + Case 4 : this = ":" ' Linux or macOS Case Else : Error 423 ' Property or method not defined: PathDelimiter End Select : End If PathDelimiter = this @@ -99,4 +99,4 @@ - \ No newline at end of file +