Some changes

functions

@@ -1,37 +0,0 @@
-  _______  _______ _________ ______
- (  ____ \(  ____ \\__   __/(  __  \
- | (    \/| (    \/   ) (   | (  \  )
- | (_____ | (__       | |   | |   ) |
- (_____  )|  __)      | |   | |   | |
-       ) || (         | |   | |   ) |
- /\____) || (____/\___) (___| (__/  )
- \_______)(_______/\_______/(______/
-
-Evaluate Desired Function
-
-bboard - Start a SDF bulletin board session
-(bboard)
-
-com - Start a SDF communication session
-(com)
-
-email - Start a SDF email session
-(email)
-
-irc-fsf - Start an IRC Free Software Foundation session
-(irc-fsf)
-
-irc-sdf - Start an IRC SDF session
-(irc-sdf)
-
-moo - Start a MUD object-oriented session
-(moo)
-
-term-local - Start a local terminal session
-(term-local)
-
-term-sdf - Start a SDF cluster session
-(term-sdf)
-
-vintage - Start a SDF vintage session
-(vintage)

initialization.el

@@ -61,11 +61,11 @@
   (load-file file))
 
 ;; Load the term-local function
-(let((file(concat(getenv "HOME")"/seid/term_local.el")))
+(let((file(concat(getenv "HOME")"/seid/terminal_local.el")))
   (load-file file))
 
 ;; Load the term-sdf function
-(let((file(concat(getenv "HOME")"/seid/term_sdf.el")))
+(let((file(concat(getenv "HOME")"/seid/terminal_sdf.el")))
   (load-file file))
 
 ;; Load the vintage function
@@ -76,10 +76,6 @@
 (let((file(concat(getenv "HOME")"/seid/vps.el")))
   (load-file file))
 
-;; Load the www function
-(let((file(concat(getenv "HOME")"/seid/www.el")))
-  (load-file file))
-
 ;; Load the seid-functions text file
 (let((file(concat(getenv "HOME")"/seid/function")))
   (find-file file))

term_local.sh

@@ -1,23 +0,0 @@
-#!/usr/bin/env bash
-
-# term-local.sh
-# Start a local terminal.
-
-# Copyright (c) 2025, Scott C. MacCallum (scm.sdf.org).
-
-# This program is free software: you can redistribute it and/or modify
-# it under the terms of the GNU Affero General Public License as published by
-# the Free Software Foundation, either version 3 of the License, or
-# at your option) any later version.
-
-# This program is distributed in the hope that it will be useful,
-# but WITHOUT ANY WARRANTY; without even the implied warranty of
-# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-# GNU Affero General Public License for more details.
-
-# You should have received a copy of the GNU Affero General Public License
-# along with this program.  If not, see <https://www.gnu.org/licenses/>.
-
-/usr/bin/env bash
-
-exit 0

terminal_local.el

@@ -18,11 +18,11 @@
 
 ;; Start a local terminal
 
-(defun term-local ()
-  "Run term_local.sh"
+(defun terminal-local ()
+  "Run terminal_local.sh"
   (interactive)
-  (if(get-buffer "term-local")
-      (kill-buffer "term-local"))
-  (let((file(concat(getenv "HOME")"/seid/term_local.sh")))
+  (if(get-buffer "terminal-local")
+      (kill-buffer "terminal-local"))
+  (let((file(concat(getenv "HOME")"/seid/terminal_local.sh")))
     (ansi-term file)
-    (rename-buffer "term-local")))
+    (rename-buffer "terminal-local")))

terminal_sdf.el

@@ -1,4 +1,4 @@
-;; term-sdf.sh
+;; terminal-sdf.sh
 
 ;; Secure shell into SDF cluster.
 ;; Copyright (c) 2025, Scott C. MacCallum (scm@sdf.org).
@@ -16,11 +16,11 @@
 ;; You should have received a copy of the GNU Affero General Public License
 ;; along with this program.  If not, see <https://www.gnu.org/licenses/>.
 
-(defun term-sdf ()
-  "Run term-sdf.sh"
+(defun terminal-sdf ()
+  "Run terminal-sdf.sh"
   (interactive)
-  (if(get-buffer "term-sdf")
-      (kill-buffer "term-sdf"))
-  (let((file(concat(getenv "HOME")"/seid/term-sdf.sh")))
+  (if(get-buffer "terminal-sdf")
+      (kill-buffer "terminal-sdf"))
+  (let((file(concat(getenv "HOME")"/seid/terminal-sdf.sh")))
     (ansi-term file)
-    (rename-buffer "term-sdf")))
+    (rename-buffer "terminal-sdf")))