49 lines
2.1 KiB
Bash
49 lines
2.1 KiB
Bash
#!/bin/sh -e
|
|
|
|
. tools/retry.sh
|
|
|
|
export EMACS="${EMACS:=emacs}"
|
|
export BASENAME=$(basename "$1")
|
|
|
|
( cask emacs -Q --batch \
|
|
--visit "$1" \
|
|
--eval "(checkdoc-eval-current-buffer)" \
|
|
--eval "(princ (with-current-buffer checkdoc-diagnostic-buffer \
|
|
(buffer-string)))" \
|
|
2>&1 | egrep -a "^$BASENAME:" | egrep -v "Messages should start" | grep "." ) && false
|
|
|
|
# this repo uses datetime versions
|
|
( cd /tmp ; travis_retry curl -OskL https://raw.githubusercontent.com/dickmao/package-lint/datetime/package-lint.el )
|
|
|
|
# cp /home/dick/package-lint/package-lint.el /tmp/
|
|
|
|
cask emacs -Q --batch \
|
|
--eval "(let ((dir (file-name-directory (locate-library \"package-lint\")))) \
|
|
(ignore-errors (delete-file (expand-file-name \
|
|
\"package-lint.elc\" dir))) \
|
|
(copy-file (expand-file-name \"package-lint.el\" \"/tmp\") \
|
|
(expand-file-name \"package-lint.el\" dir) t))"
|
|
|
|
# Reduce purity via:
|
|
# --eval "(fset 'package-lint--check-defs-prefix (symbol-function 'ignore))" \
|
|
PKG_MAIN=$(cask files | egrep -- "pkg.el$")
|
|
travis_retry cask emacs -Q --batch \
|
|
-l package-lint \
|
|
--eval "(package-initialize)" \
|
|
--eval "(push (quote (\"melpa\" . \"http://melpa.org/packages/\")) \
|
|
package-archives)" \
|
|
--eval "(package-refresh-contents)" \
|
|
--eval "(defconst package-lint--sane-prefixes \
|
|
(rx \
|
|
string-start \
|
|
(or \
|
|
\"org-dblock-write:\" \
|
|
\"string-trim-right\" \
|
|
\"org-babel-execute:\" \
|
|
\"org-babel-prep-session:\" \
|
|
\"org-babel-variable-assignments:\" \
|
|
\"org-babel-default-header-args:\" \
|
|
\"pcomplete/\")))" \
|
|
--eval "(setq package-lint-main-file (if (zerop (length \"${PKG_MAIN}\")) nil \"${PKG_MAIN}\"))" \
|
|
-f package-lint-batch-and-exit "$1"
|