Setup CI

.github/dependabot.yml

@@ -0,0 +1,11 @@
+# To get started with Dependabot version updates, you'll need to specify which
+# package ecosystems to update and where the package manifests are located.
+# Please see the documentation for all configuration options:
+# https://docs.github.com/github/administering-a-repository/configuration-options-for-dependency-updates
+
+version: 2
+updates:
+  - package-ecosystem: "github-actions"
+    directory: "/"
+    schedule:
+      interval: "weekly"

.github/workflows/gap.yml

@@ -0,0 +1,36 @@
+name: "GAP"
+on:
+  workflow_dispatch:
+  pull_request:
+  push:
+    branches:
+      - main
+      - stable-*.*
+
+jobs:
+  test-unix:
+    name: "${{ matrix.os }}${{ matrix.ABI }} / GAP ${{ matrix.gap-branch }}"
+    runs-on: "${{ matrix.os }}-latest"
+    strategy:
+      fail-fast: false
+      matrix:
+        os:
+          - ubuntu
+        gap-branch:
+          - master
+          - stable-4.11
+          - stable-4.12
+          - stable-4.13
+
+    steps:
+      - uses: actions/checkout@v4
+      - name: "Install GAP and clone/compile necessary packages"
+        uses: gap-actions/setup-gap@v2
+        with:
+          GAPBRANCH: ${{ matrix.gap-branch }}
+      - name: "Run DigraphsTestInstall"
+        uses: gap-actions/run-pkg-tests@v2
+        with:
+          GAP_TESTFILE: "tst/testall.g"
+      - uses: gap-actions/process-coverage@v2
+      - uses: codecov/codecov-action@v3

gap/dot.gi

@@ -1179,7 +1179,8 @@ function(attrs)
         if ' ' in key then
           key := StringFormatted("\"{}\"", key);
         fi;
-        if ' ' in val then
+        if ' ' in val or '>' in val then
+          # TODO what are the allowed things in the value?
           val := StringFormatted("\"{}\"", val);
         fi;
     fi;

gap/splash.gi

@@ -73,26 +73,11 @@ if not IsBound(Splash) then  # This function is written by A. Egri-Nagy
       fi;
     fi;
 
-    # type
-    if IsBound(opt.type) and (opt.type = "latex" or opt.type = "dot") then
-      type := opt.type;
-    elif Length(str) >= 6 and str{[1 .. 6]} = "%latex" then
-      type := "latex";
-    elif Length(str) >= 5 and str{[1 .. 5]} = "//dot" then
-      type := "dot";
-    else
-      ErrorNoReturn("the component \"type\" of the 2nd argument <a record> ",
-                    " must be \"dot\" or \"latex\",");
-    fi;
-    if type = "latex" then
-      inn := Concatenation(dir, file, ".tex");
-    else  # type = "dot"
-      inn := Concatenation(dir, file, ".dot");
-    fi;
+    inn := Concatenation(dir, file, ".dot");
 
     # output type and name
     filetype := "pdf";  # default
-    if IsBound(opt.filetype) and IsString(opt.filetype) and type <> "latex" then
+    if IsBound(opt.filetype) and IsString(opt.filetype) then
       filetype := opt.filetype;
     fi;
     out := Concatenation(dir, file, ".", filetype);
@@ -112,16 +97,9 @@ if not IsBound(Splash) then  # This function is written by A. Egri-Nagy
 
     # Write and compile the file
     FileString(inn, str);
-    if type = "latex" then
-      # Requires GAP >= 4.11:
-      # Exec(StringFormatted("cd {}; pdflatex {} 2>/dev/null 1>/dev/null", dir);
-      Exec(Concatenation("cd ", dir, ";",
-                         "pdflatex ", file, " 2>/dev/null 1>/dev/null"));
-    else  # type = "dot"
       # Requires GAP >= 4.11:
       # Exec(StringFormatted("{} -T {} {} -o {}", engine, filetype, inn, out));
-      Exec(Concatenation(engine, " -T", filetype, " ", inn, " -o ", out));
-    fi;
+    Exec(Concatenation(engine, " -T", filetype, " ", inn, " -o ", out));
     Exec(Concatenation(viewer, " ", out, " 2>/dev/null 1>/dev/null &"));
   end);
 fi;