X-Git-Url: https://git.distorted.org.uk/u/mdw/putty/blobdiff_plain/b0e15bb5ce898143d473202aad9c2cf53e9b5876..ec5da3100dcef76794f5ef028f0f822f509bb832:/macosx/osxdlg.m

diff --git a/macosx/osxdlg.m b/macosx/osxdlg.m
index f2d09027..f32b0909 100644
--- a/macosx/osxdlg.m
+++ b/macosx/osxdlg.m
@@ -485,7 +485,27 @@ void old_keyfile_warning(void)
      */
 }
 
-void about_box(void *window)
+static void connection_fatal_callback(void *ctx, int result)
 {
-    /* FIXME */
+    SessionWindow *win = (SessionWindow *)ctx;
+
+    [win endSession:FALSE];
+}
+
+void connection_fatal(void *frontend, char *p, ...)
+{
+    SessionWindow *win = (SessionWindow *)frontend;
+    va_list ap;
+    char *msg;
+    NSAlert *alert;
+
+    va_start(ap, p);
+    msg = dupvprintf(p, ap);
+    va_end(ap);
+
+    alert = [[NSAlert alloc] init];
+    [alert setInformativeText:[NSString stringWithCString:msg]];
+    [alert addButtonWithTitle:@"Proceed"];
+    [win startAlert:alert withCallback:connection_fatal_callback
+     andCtx:win];
 }