diff --git a/projects/kiss-vscode/src/ktxt2/KTxt2EditorProvider.kiss b/projects/kiss-vscode/src/ktxt2/KTxt2EditorProvider.kiss index ab240f11..db23e703 100644 --- a/projects/kiss-vscode/src/ktxt2/KTxt2EditorProvider.kiss +++ b/projects/kiss-vscode/src/ktxt2/KTxt2EditorProvider.kiss @@ -3,6 +3,7 @@ // Based on https://github.com/microsoft/vscode-extension-samples/blob/main/custom-editor-sample/src/catScratchEditor.ts (function register [context] + (set Prelude.printStr ->s (infoMessage s)) (let [provider (new KTxt2EditorProvider context)] (Vscode.window.registerCustomEditorProvider "ktxt2.splitView" provider))) @@ -111,4 +112,5 @@ sourceFilename (joinPath ktxt2Directory "${baseFilename}.${sourceExt}") outputFilename (joinPath ktxt2Directory "${baseFilename}.${outputExt}")] (File.saveContent sourceFilename sourceText) - (File.saveContent outputFilename outputText))) \ No newline at end of file + (File.saveContent outputFilename outputText) + (print "Export for $(document.fileName.withoutDirectory) succeeded."))) \ No newline at end of file