aboutsummaryrefslogtreecommitdiff
path: root/main.F90
diff options
context:
space:
mode:
authorJeffrey Armstrong <jeffrey.armstrong@approximatrix.com>2021-02-18 15:25:26 -0500
committerJeffrey Armstrong <jeffrey.armstrong@approximatrix.com>2021-02-18 15:25:26 -0500
commit6a0d3367e0b314d6c947950f7c3193be3d9d1465 (patch)
tree25bf0dd32e17d2dab9feb6be8bb8d2a40d8b341f /main.F90
parent2499f1720602a9010f4618f0b686f077febbdf55 (diff)
downloadLR-87-6a0d3367e0b314d6c947950f7c3193be3d9d1465.zip
LR-87-6a0d3367e0b314d6c947950f7c3193be3d9d1465.tar.gz
Set tuning to native since this build machine is pretty old. Added placeholder for DPI call on Windows. Removed unused connection variable in main.
Diffstat (limited to 'main.F90')
-rw-r--r--main.F906
1 files changed, 5 insertions, 1 deletions
diff --git a/main.F90 b/main.F90
index 7d9206e..84fca57 100644
--- a/main.F90
+++ b/main.F90
@@ -26,6 +26,7 @@ use request
#ifdef WINDOWS_GUI
use ag_render, only: appgraphics_renderer
use ag_binary, only: appgraphics_binary_handler
+use appgraphics, only: setapplicationdpiaware
#else
!use sdl_render
use dumb_render
@@ -51,7 +52,6 @@ implicit none
character(256)::initial_site
character(1024)::current_url, desired_url, input
- type(connection)::conn
#ifdef WINDOWS_GUI
type(appgraphics_renderer)::r
@@ -79,6 +79,10 @@ implicit none
#ifdef WINDOWS
call windows_network_startup()
#endif
+
+#ifdef WINDOWS_GUI
+ !call setapplicationdpiaware()
+#endif
if(command_argument_count() > 0) then