|
|
| version 1.2, 2025/03/09 15:20:18 | version 1.4, 2025/03/30 01:36:58 |
|---|---|
| Line 1 | Line 1 |
| /* | /* |
| * * | * $Id$ |
| * * * | |
| * * * | |
| * *************** | |
| * * * * * | |
| * * MUMPS * | |
| * * * * * | |
| * *************** | |
| * * * | |
| * * * | |
| * * | |
| * | |
| * fma_gedit.c | |
| * FreeM global editor | * FreeM global editor |
| * | * |
| * | * |
| * Author: Serena Willis <snw@coherent-logic.com> | * Author: Serena Willis <snw@coherent-logic.com> |
| * Copyright (C) 1998 MUG Deutschland | * Copyright (C) 1998 MUG Deutschland |
| * Copyright (C) 2023 Coherent Logic Development LLC | * Copyright (C) 2023, 2025 Coherent Logic Development LLC |
| * | * |
| * | * |
| * This file is part of FreeM. | * This file is part of FreeM. |
| Line 35 | Line 23 |
| * You should have received a copy of the GNU Affero Public License | * You should have received a copy of the GNU Affero Public License |
| * along with FreeM. If not, see <https://www.gnu.org/licenses/>. | * along with FreeM. If not, see <https://www.gnu.org/licenses/>. |
| * | * |
| * $Log$ | |
| * Revision 1.4 2025/03/30 01:36:58 snw | |
| * Make it easier to bring back fma_gedit, fix double-free in global handler, limit $CHAR to 7-bit ASCII | |
| * | |
| * Revision 1.3 2025/03/09 19:14:24 snw | |
| * First phase of REUSE compliance and header reformat | |
| * | |
| * | |
| * SPDX-FileCopyrightText: (C) 2025 Coherent Logic Development LLC | |
| * SPDX-License-Identifier: AGPL-3.0-or-later | |
| **/ | **/ |
| #include <stdlib.h> | #include <stdlib.h> |
| Line 171 int fma_globals_edit(int optc, char **op | Line 169 int fma_globals_edit(int optc, char **op |
| wprintw (wge_msg, "FreeM Global Editor\n"); | wprintw (wge_msg, "FreeM Global Editor\n"); |
| wprintw (wge_msg, " Copyright (C) 2023 Coherent Logic Development LLC\n\n"); | wprintw (wge_msg, " Copyright (C) 2023 Coherent Logic Development LLC\n\n"); |
| wprintw(wge_msg, "optc = %d\n\n", optc); | |
| wattron (wge_msg, A_BOLD); | wattron (wge_msg, A_BOLD); |
| wprintw (wge_msg, "Left and right arrow keys navigate blocks; 'q' to quit.\n\n"); | wprintw (wge_msg, "Left and right arrow keys navigate blocks; 'q' to quit.\n\n"); |
| wattroff (wge_msg, A_BOLD); | wattroff (wge_msg, A_BOLD); |