Update .github/ISSUE_TEMPLATE/what_people_are_saying.yml

Co-authored-by: Copilot <175728472+Copilot@users.noreply.github.com>
Signed-off-by: Bill Stumbo <wstumbo@charter.net>

.github/workflows/buildLoadup.yml

@@ -20,18 +20,18 @@ name: Build/Push Medley Release
 on:
   workflow_dispatch:
     inputs:
-      maiko_release:
-        description: "What maiko release to use"
-        type: string
-        default: 'Latest'
       draft:
         description: "Mark this as a draft release"
-        type: boolean
-        default: false
+        type: choice
+        options:
+        - 'false'
+        - 'true'
       force:
         description: "Force build even if build already successfully completed for this commit"
-        type: boolean
-        default: false
+        type: choice
+        options:
+        - 'false'
+        - 'true'
 
   workflow_call:
     outputs:
@@ -39,21 +39,16 @@ on:
         description: "'True' if medley build completed successully"
         value: ${{ jobs.complete.outputs.build_successful }}
     inputs:
-      maiko_release:
-        description: "What maiko release to use"
-        required: false
-        type: string
-        default: 'Latest'
       draft:
         description: "Mark this as a draft release"
         required: false
-        type: boolean
-        default: false
+        type: string
+        default: 'false'
       force:
         description: "Force build even if build already successfully completed for this commit"
         required: false
-        type: boolean
-        default: false
+        type: string
+        default: 'false'
     secrets:
       OIO_SSH_KEY:
         required: true
@@ -115,7 +110,7 @@ jobs:
     needs: [sentry]
     if: |
       needs.sentry.outputs.release_not_built == 'true'
-      || inputs.force == true
+      || inputs.force == 'true'
 
     steps:
       # Checkout the actions for this repo owner
@@ -135,21 +130,24 @@ jobs:
         id: tag
         uses: ./../actions/release-tag-action
 
-      # Get Maiko release information, use maiko release tag from input or Latest
+      # Get Maiko release information, retrieves the name of the latest (draft)
       # release.  Used to download the correct Maiko release
+      # Find latest release (draft or normal)
       - name: Get maiko release information
         id: maiko
         run: |
           tag=""
-          if [ "${{ inputs.maiko_release }}" = "Latest" ];
+          if [ "${{ inputs.draft }}" = "true" ];
+          then
+            gh release list --repo ${{ github.repository_owner }}/maiko | grep Draft >/tmp/releases-$$
+            if [ $? -eq 0 ];
+            then
+              tag=$(head -n 1 /tmp/releases-$$ | awk '{ print $3 }')
+            fi
+          fi
+          if [ -z "${tag}" ];
           then
             tag=$(gh release list --repo ${{ github.repository_owner }}/maiko | grep Latest | head -n 1 | awk '{ print $3 }')
-          else
-            tag=$(echo "${{ inputs.maiko_release }}" | sed 's/[[:space:]]//g')
-            set +e
-            gh release view ${tag} --repo ${{ github.repository_owner }}/maiko
-            if [ $? -ne 0 ]; then echo "!!!!!!! Error:  Cannot find Maiko release ${tag}. Exiting."; exit 1; fi
-            set -e
           fi
           echo "maiko_tag=${tag}" >> ${GITHUB_OUTPUT}
         env:
@@ -264,7 +262,7 @@ jobs:
     needs: [sentry, loadup]
     if: |
       needs.sentry.outputs.release_not_built == 'true'
-      || inputs.force == true
+      || inputs.force == 'true'
 
     steps:
 
@@ -340,7 +338,7 @@ jobs:
     needs: [sentry, loadup]
     if: |
       needs.sentry.outputs.release_not_built == 'true'
-      || inputs.force == true
+      || inputs.force == 'true'
 #    if: false
 
     defaults:
@@ -411,7 +409,7 @@ jobs:
     needs: [sentry, loadup, linux_installer]
     if: |
       needs.sentry.outputs.release_not_built == 'true'
-      || inputs.force == true
+      || inputs.force == 'true'
 
     outputs:
       cygwin_installer: ${{ steps.compile_iss.outputs.CYGWIN_INSTALLER }}
@@ -514,7 +512,7 @@ jobs:
     needs: [sentry, loadup, linux_installer, macos_installer, cygwin_installer]
     if: |
       needs.sentry.outputs.release_not_built == 'true'
-      || inputs.force == true
+      || inputs.force == 'true'
 
     steps:
 

.gitignore

@@ -31,7 +31,7 @@ loadups/whereis.hash
 loadups/apps.sysout
 loadups/fuller.database
 loadups/build/
-loadups/tagged
+loadups/branches
 loadups/gitinfo
 
 

README.md

@@ -1,14 +1,12 @@
 # Medley 
 
-The [Medley Interlisp Project](https://interlisp.org) aims to preserve, revive, and modernize the [Interlisp](https://interlisp.org) software development environment for rapid prototyping, research and Artificial Intelligence created at Xerox PARC since the 1970s.
+This repository is for the Lisp environment of [Medley](https://interlisp.org).
 
-This repository is for the Lisp environment of the [Medley](https://interlisp.org) release of Interlisp. Other repositories hold additional subsystems and applications such as [Maiko](https://github.com/Interlisp/maiko), the implementation (in C) of the Medley virtual machine, the [LOOPS](https://github.com/Interlisp/loops) object-oriented extension of Interlisp, and the [NoteCards](https://github.com/Interlisp/notecards) hypermedia system.
-
-[Install and Run](https://interlisp.org/software/install-and-run) covers ways to install and start up Medley on Linux systems, MacOS, Windows (with or without WSL), and in a web browser.
+[Install and Run](https://interlisp.org/software/install-and-run) covers ways to install and start up Medley on Linux systems, MacOS, and Windows (with or without WSL).
 
 [Using Medley](https://interlisp.org/software/using-medley/) has an overview and pointers to documentation.
 
-The [Glossary](https://interlisp.org/history/glossary) defines system-specific terms such as "loadup" and "sysout".
+[Interlisp/maiko](https://github.com/Interlisp/maiko), is the repo for the implementation (in C) of the Medley virtual machine. 
 
 ## Releases
 
@@ -69,9 +67,25 @@ If you have a high-resolution display, note that much of the graphics was design
 
 Medley presumes you have a 3-button mouse; the scroll-wheel on some mice acts as one, with some difficulty. Go into XQuartz Preferences/Input and check "Emulate three button mouse" option.
 
-### Running Medley Interlisp
+### Running Medley Interlisp (obsolete)
 
-The primer [Medley Interlisp for the Newcomer](https://primer.interlisp.org) eases new users into the Interlisp environment. It assumes no prior knowledge of Lisp and covers the user interface, programming and debugging, windows and graphics, and more. We recommend consulting this document to learn how to run and use the system.
+The `run-medley` script in this repo sets up some convenient defaults. Running Medley can be done by typing:
+```
+$ cd medley
+$ ./run-medley
+```
+
+Or, if you wish to start Medley up with a different SYSOUT:
+
+```
+$ cd medley
+$ ./run-medley <SYSOUT-file-name>
+```
+The first time the system is run it loads the system image that comes
+with the system.  When you exit the system (or "do a `SaveVM`" menu
+option) the state of your machine is saved in a file named
+`~/lisp.virtualmem`.  Subsequent system startups load the
+`~/lisp.virtualmem` image by default.
 
 ### Exiting The System
 
@@ -109,7 +123,7 @@ Each directory should have a README.md, but briefly
 * BUILDING.md -- instructions on how to make your own loadups
 * clos -- early implementation of Common Lisp Object System
 * CLTL2 -- files submitted to bring Medley up to the conformance to "Common Lisp, the Language" 2nd edition. Not enough to conform to the ANSI standard lisp.
-* docs -- Documentation files (in TEdit format, PDFs, or online help
+* docs -- Documentation files (in TEdit format, PDFs, or online help; look [here](https://github.com/Interlisp/medley/Documentation))
 * fonts -- raster fonts (or font widths) in various resolutions for display, postscript, interpress, press formats
 * greetfiles -- various configuration setups
 * internal -- These _were_ internal to Venue

docs/html-primer/Medley-Primer-OnePage.html

@@ -0,0 +1,2 @@
+<!DOCTYPE  html PUBLIC "-//W3C//DTD XHTML 1.0 Frameset//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-frameset.dtd">
+<html xmlns="http://www.w3.org/1999/xhtml"><head><meta http-equiv="Content-Type" content="text/html; charset=utf-8"/><title>Medley-Primer-OnePage</title></head><frameset cols="310pt,*" rows="94%"><frame src="Medley-Primer-OnePage_files/headings.htm" name="headings"/><frame src="Medley-Primer-OnePage_files/content.htm" name="content"/></frameset></html>