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 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) 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 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