Fixed example Fortran90 sample in Editor config widget.

This commit is contained in:
Ernie Pasveer
2026-08-12 18:01:16 -05:00
parent 781d57d8d9
commit 04b5cf519f
+11
View File
@@ -417,6 +417,17 @@ void SeerEditorConfigPage::handleLanguageTabChanged (int index) {
" Put_Line (\"Hello, Seer!\"); -- Greetings\n"
"end Main;",
"sample.adb");
} else if (index == 4) { // Fortran90
editorWidget->sourceArea()->openText("!\n"
"! Seer, Copyright 2026 (c)\n"
"! Ernie Pasveer (epasveer@att.net)\n"
"! Fortran90 example\n"
"!\n"
"program hello_world\n"
" implicit none\n"
" print *, \"Hello, World!\"\n"
"end program hello_world\n",
"sample.f90");
}
editorWidget->sourceArea()->setCurrentLine(0);