diff options
| author | Albert Graef | 2022-08-04 03:31:09 +0200 |
|---|---|---|
| committer | Albert Graef | 2022-08-04 03:33:37 +0200 |
| commit | 7c18ded1bc58e3ad5955e342942a19ac75ee5c53 (patch) | |
| tree | 98a76362dbb296588b919ba71d8de1af0ff7b0fb | |
| parent | 0683907ed13a9b193d6bd5cb5b3dbf2ca8a472db (diff) | |
| download | aur-pure-pcre.tar.gz | |
Fixes for Emacs 27 compatibility.
| -rw-r--r-- | .SRCINFO | 7 | ||||
| -rw-r--r-- | PKGBUILD | 13 | ||||
| -rw-r--r-- | emacs27.patch | 44 |
3 files changed, 57 insertions, 7 deletions
@@ -1,9 +1,7 @@ -# Generated by mksrcinfo v8 -# Sat Feb 16 15:58:24 UTC 2019 pkgbase = pure-pcre pkgdesc = Pure is a modern-style functional programming language based on term rewriting (variant with Perl regex support). pkgver = 0.68 - pkgrel = 3 + pkgrel = 4 url = http://purelang.bitbucket.org/ arch = i686 arch = x86_64 @@ -23,7 +21,8 @@ pkgbase = pure-pcre provides = pure conflicts = pure source = https://github.com/agraef/pure-lang/releases/download/pure-0.68/pure-0.68.tar.gz + source = emacs27.patch md5sums = 082d522d05e58e55dc8094ba4c3d3eda + md5sums = fe62166e277a6accefbfa81e2e307900 pkgname = pure-pcre - @@ -7,7 +7,7 @@ pkgname=pure-pcre _pkgname=pure pkgver=0.68 -pkgrel=3 +pkgrel=4 pkgdesc="Pure is a modern-style functional programming language based on term rewriting (variant with Perl regex support)." arch=("i686" "x86_64") license=('GPL3' 'LGPL3') @@ -21,8 +21,15 @@ optdepends=("clang35: needed for inlining C/C++ code" "texmacs-pure: embedding Pure sessions in TeXmacs") provides=('pure') conflicts=('pure') -source=("https://github.com/agraef/pure-lang/releases/download/$_pkgname-$pkgver/$_pkgname-$pkgver.tar.gz") -md5sums=('082d522d05e58e55dc8094ba4c3d3eda') +source=("https://github.com/agraef/pure-lang/releases/download/$_pkgname-$pkgver/$_pkgname-$pkgver.tar.gz" + "emacs27.patch") +md5sums=('082d522d05e58e55dc8094ba4c3d3eda' + 'fe62166e277a6accefbfa81e2e307900') + +prepare() { + cd $srcdir/$_pkgname-$pkgver + patch -p2 -i ../emacs27.patch +} build() { cd $srcdir/$_pkgname-$pkgver diff --git a/emacs27.patch b/emacs27.patch new file mode 100644 index 000000000000..9850bdcb277b --- /dev/null +++ b/emacs27.patch @@ -0,0 +1,44 @@ +diff --git a/pure/etc/flycheck-pure.el b/pure/etc/flycheck-pure.el +index 152489ae..448d12d2 100644 +--- a/pure/etc/flycheck-pure.el ++++ b/pure/etc/flycheck-pure.el +@@ -60,7 +60,7 @@ + "A Pure syntax checker using the Pure interpreter. + + See URL `https://agraef.github.io/pure-lang/'." +- :command ("pure" "--check" (option-flag "-w" flycheck-pure-warnings) source) ++ :command ("pure" "--check" "-I." (option-flag "-w" flycheck-pure-warnings) source) + :error-patterns + ((warning line-start (file-name) ", line " line ": warning: " (message) line-end) + (error line-start (file-name) ", line " line ": " (message) line-end)) +diff --git a/pure/etc/pure-mode.el.in b/pure/etc/pure-mode.el.in +index 221bfa52..5807a43a 100644 +--- a/pure/etc/pure-mode.el.in ++++ b/pure/etc/pure-mode.el.in +@@ -874,7 +874,7 @@ Commands + "Starts a pdsend process to communicate with Pd via UDP port 4711." + (interactive) + (start-process "pdsend" nil "pdsend" "4711" "localhost" "udp") +- (process-kill-without-query (get-process "pdsend"))) ++ (set-process-query-on-exit-flag (get-process "pdsend") nil)) + + (defun pd-pure-send-stop-process () + "Stops a previously started pdsend process." +@@ -1421,7 +1421,7 @@ sending input, manipulating the command history, etc." + pure-last-dir dir) + (set-process-sentinel (get-process "pure-eval") 'pure-eval-sentinel) + (if (not pure-query-before-kill) +- (process-kill-without-query (get-process "pure-eval"))) ++ (set-process-query-on-exit-flag (get-process "pure-eval") nil)) + ;; switch to and go to the end of the eval buffer + (pop-to-buffer "*pure-eval*") + (goto-char (point-max)) +@@ -2270,7 +2270,7 @@ If prefix ARG is not nil, remove an existing tracepoint instead." + (indent-to (eval (cdr indent-fun))) + )))) + +-(defun pure-alignment-column (&optional lim &optional flag) ++(defun pure-alignment-column (&optional lim flag) + "Look for an alignment column (`=') in the vicinity of + point. LIM, if given, limits the search to the region between + point and LIM. Return a list of two elements: (EQUALS-COL |