X-Git-Url: https://git.distorted.org.uk/~mdw/sgt/putty/blobdiff_plain/1cd246bbcbac9071752ff80152c39e0569030aa8..d57835ab1b43dcdb5dbe639aa61a10555540db30:/windlg.c

diff --git a/windlg.c b/windlg.c
index b3bfcbff..306ee4ff 100644
--- a/windlg.c
+++ b/windlg.c
@@ -357,6 +357,27 @@ static int CALLBACK LogProc (HWND hwnd, UINT msg,
     return 0;
 }
 
+static int CALLBACK LicenceProc (HWND hwnd, UINT msg,
+				 WPARAM wParam, LPARAM lParam) {
+    switch (msg) {
+      case WM_INITDIALOG:
+	return 1;
+      case WM_COMMAND:
+	switch (LOWORD(wParam)) {
+	  case IDOK:
+	    abtbox = NULL;
+	    DestroyWindow (hwnd);
+	    return 0;
+	}
+	return 0;
+      case WM_CLOSE:
+	abtbox = NULL;
+	DestroyWindow (hwnd);
+	return 0;
+    }
+    return 0;
+}
+
 static int CALLBACK AboutProc (HWND hwnd, UINT msg,
 			       WPARAM wParam, LPARAM lParam) {
     switch (msg) {
@@ -377,7 +398,7 @@ static int CALLBACK AboutProc (HWND hwnd, UINT msg,
 	  case IDA_LICENCE:
 	    EnableWindow(hwnd, 0);
 	    DialogBox (hinst, MAKEINTRESOURCE(IDD_LICENCEBOX),
-		       NULL, AboutProc);
+		       NULL, LicenceProc);
 	    EnableWindow(hwnd, 1);
 	    return 0;
 	}