From 84e07c346a1721fe796fb1f4d5f95b0602ee72fe Mon Sep 17 00:00:00 2001
From: Joe Taylor <joe@princeton.edu>
Date: Mon, 5 Jul 2021 15:11:35 -0400
Subject: [PATCH 1/4] Correct flawed initial values for deltaa(1:2) in
 polfit.f90.

---
 map65/libm65/polfit.f90 | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/map65/libm65/polfit.f90 b/map65/libm65/polfit.f90
index e01bbe6a9..33e8d44ed 100644
--- a/map65/libm65/polfit.f90
+++ b/map65/libm65/polfit.f90
@@ -17,7 +17,7 @@ subroutine polfit(y,npts,a)
   ipk=maxloc(y)
   a(3)=(ipk(1)-1)*45.0
 
-  deltaa(1:2)=0.1*(a(2)-a(1))
+  deltaa(1:2)=0.1*a(2)
   deltaa(3)=10.0
   nterms=3
 

From bada2dd822a5a260fa5092c7bb9baeaaf10fc13e Mon Sep 17 00:00:00 2001
From: Joe Taylor <joe@princeton.edu>
Date: Mon, 5 Jul 2021 15:25:25 -0400
Subject: [PATCH 2/4] Remove a diagnostic print from display.f90.

---
 map65/libm65/display.f90 | 1 -
 1 file changed, 1 deletion(-)

diff --git a/map65/libm65/display.f90 b/map65/libm65/display.f90
index 006ae7b9a..10f50fc20 100644
--- a/map65/libm65/display.f90
+++ b/map65/libm65/display.f90
@@ -128,7 +128,6 @@ subroutine display(nkeep,ftol)
              line3(k)(23:27)//line3(k)(35:38)//line3(k)(46:70)//        &
              line3(k)(73:77)
         if(livecq(56:56).eq.':') livecq(56:58)=' '//livecq(56:57)
-        print*,'= ',trim(livecq)
         if(index(livecq,' CQ ').gt.0 .or. index(livecq,' QRZ ').gt.0 .or.   &
            index(livecq,' QRT ').gt.0 .or. index(livecq,' CQV ').gt.0 .or.  &
            index(livecq,' CQH ').gt.0) write(19,1029) livecq

From a141b5af348c1458b548a47cf855cbec8831c617 Mon Sep 17 00:00:00 2001
From: Bill Somerville <bill@classdesign.com>
Date: Mon, 5 Jul 2021 20:42:10 +0100
Subject: [PATCH 3/4] Build map65 with a winmain using no console terminal

---
 map65/CMakeLists.txt | 4 ++++
 1 file changed, 4 insertions(+)

diff --git a/map65/CMakeLists.txt b/map65/CMakeLists.txt
index 2eba82efb..f9ff110f6 100644
--- a/map65/CMakeLists.txt
+++ b/map65/CMakeLists.txt
@@ -51,6 +51,10 @@ add_executable (map65 ${map65_CXXSRCS} ${map65_CSRCS} ${map65_GENUISRCS} map65.r
 target_include_directories (map65 PRIVATE ${CMAKE_SOURCE_DIR} ${FFTW3_INCLUDE_DIRS})
 target_link_libraries (map65 wsjt_qt m65impl ${FFTW3_LIBRARIES} Qt5::Widgets Qt5::Network Portaudio::Portaudio Usb::Usb)
 
+if (WSJT_CREATE_WINMAIN)
+  set_target_properties (map65 PROPERTIES WIN32_EXECUTABLE ON)
+endif (WSJT_CREATE_WINMAIN)
+
 if (WIN32)
   install (
     CODE "get_filename_component (_path \"\$ENV{DESTDIR}\${CMAKE_INSTALL_PREFIX}/${CMAKE_INSTALL_BINDIR}/wsjtx_dir.txt\" REALPATH)

From 522f698c6300613532dd470f6de5f9c9ca986fbf Mon Sep 17 00:00:00 2001
From: Bill Somerville <bill@classdesign.com>
Date: Mon, 5 Jul 2021 20:48:05 +0100
Subject: [PATCH 4/4] Release note updates

---
 NEWS              | 2 ++
 Release_Notes.txt | 2 ++
 2 files changed, 4 insertions(+)

diff --git a/NEWS b/NEWS
index 5fb39e0d1..2fd090be1 100644
--- a/NEWS
+++ b/NEWS
@@ -26,6 +26,8 @@ MAP65:
    decodes.
  - Provide access to Release Notes from the Help menu
  - Correct the formatting of Q65 messages to livecq
+ - Repair an Xpol polarization finding hang
+ - Build MAP65 to start without an attached console
 
 WSJT-X:
  - Repair a long standing defect that caused UDP Protocol Heartbeat
diff --git a/Release_Notes.txt b/Release_Notes.txt
index 386746893..9dadd4689 100644
--- a/Release_Notes.txt
+++ b/Release_Notes.txt
@@ -26,6 +26,8 @@ MAP65:
    decodes.
  - Provide access to Release Notes from the Help menu
  - Correct the formatting of Q65 messages to livecq
+ - Repair an Xpol polarization finding hang
+ - Build MAP65 to start without an attached console
 
 WSJT-X:
  - Repair a long standing defect that caused UDP Protocol Heartbeat