diff --git a/app/src/gambas3/.src/Project/Farm/FPublish.class b/app/src/gambas3/.src/Project/Farm/FPublish.class
index 530115d70..3528ed965 100644
--- a/app/src/gambas3/.src/Project/Farm/FPublish.class
+++ b/app/src/gambas3/.src/Project/Farm/FPublish.class
@@ -39,7 +39,7 @@ Public Sub Form_Open()
     Next
   Endif
   
-  cmbScreenshot.Text = Project.PublishScreenshot
+  cmbScreenshot.Text = File.Name(Project.PublishScreenshot)
   If cmbScreenshot.Index < 0 Then cmbScreenshot.Index = 0
   
   If Project.HasModule("form") Or If Project.Components.Exist("gb.sdl") Then
@@ -77,7 +77,7 @@ Private Sub SaveProject()
   If cmbScreenshot.Index <= 0 Then
     Project.PublishScreenshot = ""
   Else
-    Project.PublishScreenshot = ".hidden/screenshots" &/ cmbScreenshot.Text
+    Project.PublishScreenshot = cmbScreenshot.Text
   Endif
   
   If Project.HasModule("form") Then Project.PublishCreateMenu = btnCreateMenu.Value
diff --git a/app/src/gambas3/.src/Project/Farm/FSoftwareFarm.class b/app/src/gambas3/.src/Project/Farm/FSoftwareFarm.class
index b86fd0b1c..453013db6 100644
--- a/app/src/gambas3/.src/Project/Farm/FSoftwareFarm.class
+++ b/app/src/gambas3/.src/Project/Farm/FSoftwareFarm.class
@@ -302,6 +302,7 @@ Private Sub UpdateSoftware()
     
       txtDescription.Text = sText
       txtDescription.H = txtDescription.Font.RichTextHeight(Replace(Html(sText), "\n", "<br>"), txtDescription.W)
+      txtDescription.Show
       
     Endif
     
@@ -453,6 +454,7 @@ Public Sub panDesc_Arrange()
 
   spnScreenshot.Move(imvScreenshot.ScreenX - spnScreenshot.Parent.ScreenX + imvScreenshot.W \ 2 - 16, imvScreenshot.ScreenY - spnScreenshot.Parent.ScreenY + imvScreenshot.H \ 2 - 16, 32, 32)
   If panSoftware.Visible Then imvScreenshot.ZoomFit
+  If txtDescription.Visible Then txtDescription.H = txtDescription.Font.RichTextHeight(Replace(Html(txtDescription.Text), "\n", "<br>"), txtDescription.W)
 
 End