Apple-2-SW/emailler
1
0
Fork 0
mirror of https://github.com/bobbimanners/emailler.git synced 2024-05-28 20:41:33 +00:00
Code Issues Projects Releases Wiki Activity

EMAIL: Moved a couple of small routines to LC

Browse Source
This commit is contained in:
Bobbi Webber-Manners 2020-09-06 00:29:04 -04:00
parent 379af62ac6
commit 3608cf7c8c
1 changed files with 4 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
apps/email.c
View File

@ -169,6 +169,7 @@ void pr_spc(uint8_t n) {
/*
* Save preferences
*/
#pragma code-name (push, "LC")
void save_prefs(void) {
_filetype = PRODOS_T_TXT;
_auxtype = 0;
@ -178,10 +179,12 @@ void save_prefs(void) {
fprintf(fp, "order:%s", (reverse ? "<" : ">"));
fclose(fp);
}
#pragma code-name (pop)
/*
* Load preferences
*/
#pragma code-name (push, "LC")
void load_prefs(void) {
char order = 'a';
fp = fopen("EMAIL.PREFS", "rb");
@ -191,6 +194,7 @@ void load_prefs(void) {
fclose(fp);
reverse = (order == '<' ? 1 : 0);
}
#pragma code-name (pop)
/*
* Print ASCII-art envelope