diff --git a/functions b/functions deleted file mode 100644 index 85ef639..0000000 --- a/functions +++ /dev/null @@ -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) diff --git a/initialization.el b/initialization.el index f6b582d..da39765 100644 --- a/initialization.el +++ b/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)) diff --git a/term_local.sh b/term_local.sh deleted file mode 100755 index 6904820..0000000 --- a/term_local.sh +++ /dev/null @@ -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 . - -/usr/bin/env bash - -exit 0 diff --git a/terminal_local.el b/terminal_local.el index f4287dd..17b2003 100644 --- a/terminal_local.el +++ b/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"))) diff --git a/terminal_sdf.el b/terminal_sdf.el index 28bc0c9..9c4a785 100644 --- a/terminal_sdf.el +++ b/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 . -(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")))