diff options
author | Yousuf Philips <philipz85@hotmail.com> | 2015-09-13 16:21:04 +0400 |
---|---|---|
committer | Jan Holesovsky <kendy@collabora.com> | 2015-09-14 07:15:37 +0000 |
commit | 84f91a57539f7841cf50c924440f6890341c29c6 (patch) | |
tree | f5401e816ac0253163bb8685dc46f84fd3849839 /helpauthoring | |
parent | d1b3160a5ca08bfbfeaa5a1d3ac4d4aa4f50e5f3 (diff) |
Use last used directory in the open dialog
Change-Id: I67db6dc4032b1de22c1eec484a0da4d673973b79
Reviewed-on: https://gerrit.libreoffice.org/18530
Reviewed-by: Jan Holesovsky <kendy@collabora.com>
Tested-by: Jan Holesovsky <kendy@collabora.com>
Diffstat (limited to 'helpauthoring')
-rw-r--r-- | helpauthoring/HelpAuthoring/_Main.xba | 7 |
1 files changed, 6 insertions, 1 deletions
diff --git a/helpauthoring/HelpAuthoring/_Main.xba b/helpauthoring/HelpAuthoring/_Main.xba index 61abba52..c181ab1f 100644 --- a/helpauthoring/HelpAuthoring/_Main.xba +++ b/helpauthoring/HelpAuthoring/_Main.xba @@ -266,11 +266,16 @@ Dim FileProperties(1) As New com.sun.star.beans.PropertyValue ListAny(0) = com.sun.star.ui.dialogs.TemplateDescription.FILEOPEN_SIMPLE oFileDialog = CreateUnoService("com.sun.star.ui.dialogs.FilePicker") oFileDialog.Initialize(ListAny()) - oFileDialog.DisplayDirectory = sDocRoot + If sLastSaveDir <> "" AND IsSubDir(sLastSaveDir,sDocRoot) Then + oFileDialog.setDisplayDirectory(sLastSaveDir) + Else + oFileDialog.DisplayDirectory = sDocRoot + End If oFileDialog.AppendFilter("Help", "*.xhp") oFileDialog.SetTitle("Open Help File") iAccept = oFileDialog.Execute() If iAccept = 1 Then + WriteConfig("LastSaveDir",oFileDialog.getDisplayDirectory+"/") sPath = oFileDialog.Files(0) FileProperties(0).Name = "FilterName" FileProperties(0).Value ="XHP_Help" |