Skip to content

Instantly share code, notes, and snippets.

@stefan2904
Last active December 13, 2022 19:16
Show Gist options
  • Save stefan2904/85cff4c12a1e0e07e3ddd4a822711c39 to your computer and use it in GitHub Desktop.
Save stefan2904/85cff4c12a1e0e07e3ddd4a822711c39 to your computer and use it in GitHub Desktop.
FROM debian:sid
RUN apt-get update
RUN apt-get install -y git make emacs
RUN git clone --depth 1 --branch release_9.5.5 https://git.savannah.gnu.org/git/emacs/org-mode.git org955
RUN git clone --depth 1 --branch release_9.6 https://git.savannah.gnu.org/git/emacs/org-mode.git org96
RUN cd org955 && make autoloads
RUN cd org96 && make autoloads
RUN git clone --depth 1 --branch 0.4 https://github.com/toshism/org-super-links.git org-super-links-04
RUN git clone --depth 1 --branch fix-time-format https://github.com/akirak/org-super-links.git org-super-links-fix
ADD org-sl-test.el .
CMD ["bash"]
(add-to-list 'load-path (concat "/" (elt argv 0) "/lisp"))
(require 'org)
(print (concat "Test for org version: " (org-version)))
(print (concat "Test using " (elt argv 1)))
(require 'package)
(add-to-list 'package-archives '("melpa" . "https://melpa.org/packages/") t)
(add-to-list 'load-path (concat "/" (elt argv 1)))
(package-initialize)
(require 'org-super-links)
(print (concat "org-time-stamp-formats: " (cdr org-time-stamp-formats)))
(print (concat "substring: " (substring (cdr org-time-stamp-formats) 1 -1)))
(print (concat "org-super-links-backlink-prefix-timestamp: " (org-super-links-backlink-prefix-timestamp)))
(print (concat "org-super-links-link-prefix-timestamp: " (org-super-links-link-prefix-timestamp)))
#!/bin/bash
function line()
{
echo -e "\n\n"
echo "$1"
echo ""
}
function tick()
{
echo "\`\`\`"
}
docker build . -f Dockerfile -t org9
line "## orgmode 9.5.5"
line "### upstream tag 0.4"
tick
docker run -i -t org9 emacs --script org-sl-test.el org955 org-super-links-04
tick
line "### akirak fix"
tick
docker run -i -t org9 emacs --script org-sl-test.el org955 org-super-links-fix
tick
line "## orgmode 9.6"
line "### upstream tag 0.4"
tick
docker run -i -t org9 emacs --script org-sl-test.el org96 org-super-links-04
tick
line "### akirak fix"
tick
docker run -i -t org9 emacs --script org-sl-test.el org96 org-super-links-fix
tick
@stefan2904
Copy link
Author

stefan2904 commented Dec 13, 2022

Output

orgmode 9.5.5

upstream tag 0.4

Loading /etc/emacs/site-start.d/00debian.el (source)...

"Test for org version: 9.5.5"

"Test using org-super-links-04"

"org-time-stamp-formats: <%Y-%m-%d %a %H:%M>"

"substring:              %Y-%m-%d %a %H:%M"

"org-super-links-backlink-prefix-timestamp: [2022-12-13 Tue 19:15] <- "

"org-super-links-link-prefix-timestamp: [2022-12-13 Tue 19:15] -> "

akirak fix

Loading /etc/emacs/site-start.d/00debian.el (source)...

"Test for org version: 9.5.5"

"Test using org-super-links-fix"

"org-time-stamp-formats: <%Y-%m-%d %a %H:%M>"

"substring:              %Y-%m-%d %a %H:%M"

"org-super-links-backlink-prefix-timestamp: [2022-12-13 Tue 19:15] <- "

"org-super-links-link-prefix-timestamp: [2022-12-13 Tue 19:15] -> "

orgmode 9.6

upstream tag 0.4

Loading /etc/emacs/site-start.d/00debian.el (source)...

"Test for org version: 9.6"

"Test using org-super-links-04"

"org-time-stamp-formats: %Y-%m-%d %a %H:%M"

"substring:              Y-%m-%d %a %H:%"

"org-super-links-backlink-prefix-timestamp: [Y-12-13 Tue 19:%] <- "

"org-super-links-link-prefix-timestamp: [Y-12-13 Tue 19:%] -> "

akirak fix

Loading /etc/emacs/site-start.d/00debian.el (source)...

"Test for org version: 9.6"

"Test using org-super-links-fix"

"org-time-stamp-formats: %Y-%m-%d %a %H:%M"

"substring:              Y-%m-%d %a %H:%"

"org-super-links-backlink-prefix-timestamp: [2022-12-13 Tue 19:15] <- "

"org-super-links-link-prefix-timestamp: [2022-12-13 Tue 19:15] -> "

Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment