--- /dev/null
+;;;; hacks.el --- a few functions to help me work on the manual
+;;;; Jim Blandy <jimb@red-bean.com> --- October 1998
+;;;; -- imported from https://git.savannah.gnu.org/cgit/guile.git/tree/doc/hacks.el
+;;;; This code should be covered by the same license as GNU Guile (GPL3).
+
+(defun jh-exemplify-region (start end)
+ (interactive "r")
+ (save-excursion
+ (save-restriction
+ (narrow-to-region start end)
+
+ ;; Texinfo doesn't handle tabs well.
+ (untabify (point-min) (point-max))
+
+ ;; Quote any characters special to texinfo.
+ (goto-char (point-min))
+ (while (re-search-forward "[{}@]" nil t)
+ (replace-match "@\\&")))))
+++ /dev/null
-#!/bin/sh
-#
-# SPDX-License-Identifier: 0BSD
-# spit out ONLY error messages using groff.
-
-existence()
-{
- command -v "$1" >/dev/null 2>&1
-}
-
-if existence groff;
-then
- echo "groff check"
- for f in `find . -name \*\.[1-9]`;
- do
- LC_ALL=en_US.UTF-8 \
- MANROFFSEQ='' \
- MANWIDTH=80 \
- groff -m mandoc -b -z -w w $f;
- done
- # FIXME below, grande stupidity.
- rm groff_lint.log
- echo "Wrong use of B"
- for f in `find . -name \*\.[1-9]`;
- do
- awk '/^\.B$/ {print FILENAME":"NR":"$0}' $f >> groff_lint.log || true
- done
-fi
-
-echo "mandoc check"
-# spit out ONLY error messages with mandoc:
-if existence mandoc;
-then
- mandoc -T lint `find . -name \*\.[1-9]`
-fi
-
-#LC_ALL=en_US.UTF-8 MANROFFSEQ='' MANWIDTH=80 /run/current-system/profile/bin/man --warnings -E UTF-8 -l -Tutf8 -Z <*.5> >report5.log
-#LC_ALL=en_US.UTF-8 MANROFFSEQ='' MANWIDTH=80 /run/current-system/profile/bin/man --warnings -E UTF-8 -l -Tutf8 -Z <*.1> >report1.log
+++ /dev/null
-#!/bin/sh
-# check python style (and 2 to 3 migration)
-#
-# behold, the worst lowest effort shell script
-# ...given that we have more generic checking
-# for executables in other scripts already
-
-existence()
-{
- command -v "$1" >/dev/null 2>&1
-}
-
-# It is assumed that you are in 'lint'.
-LOGFILE="python-lint.log"
-
-# invoke from root of source!
-if [ $(basename $(pwd)) = "scripts" ]
-then
- return 1
-else
- if [ -e "${LOGFILE}" ]
- then
- rm ${LOGFILE}
- fi
-
- if existence python;
- then
- python --version >> ${LOGFILE}
- fi
-
- if existence python2;
- then
- python2 --version >> ${LOGFILE}
- fi
-
- if existence python3;
- then
- python3 --version >> ${LOGFILE}
- fi
-
- if existence python3.7;
- then
- python3.7 --version >> ${LOGFILE}
- fi
-
- if existence flake8;
- then
- echo >> ${LOGFILE}
- echo "flake8:" >> ${LOGFILE}
- echo >> ${LOGFILE}
- flake8 >> ${LOGFILE}
- fi
-
- if existence flake8-3.7;
- then
- echo >> ${LOGFILE}
- echo "flake8:" >> ${LOGFILE}
- echo >> ${LOGFILE}
- flake8-3.7 >> ${LOGFILE}
- fi
-
- if existence 2to3;
- then
- echo >> ${LOGFILE}
- echo "2to3" >> ${LOGFILE}
- echo >> ${LOGFILE}
- 2to3 -v -d . >> ${LOGFILE}
- 2to3 -v -p . >> ${LOGFILE}
- fi
-
- if existence 2to3-3.7;
- then
- echo >> ${LOGFILE}
- echo "2to3" >> ${LOGFILE}
- echo >> ${LOGFILE}
- 2to3-3.7 -v -d . >> ${LOGFILE}
- 2to3-3.7 -v -p . >> ${LOGFILE}
- fi
-fi
--- /dev/null
+#!/bin/sh
+#
+# SPDX-License-Identifier: 0BSD
+# spit out ONLY error messages using groff.
+
+existence()
+{
+ command -v "$1" >/dev/null 2>&1
+}
+
+if existence groff;
+then
+ echo "groff check"
+ for f in `find . -name \*\.[1-9]`;
+ do
+ LC_ALL=en_US.UTF-8 \
+ MANROFFSEQ='' \
+ MANWIDTH=80 \
+ groff -m mandoc -b -z -w w $f;
+ done
+ # FIXME below, grande stupidity.
+ rm groff_lint.log
+ echo "Wrong use of B"
+ for f in `find . -name \*\.[1-9]`;
+ do
+ awk '/^\.B$/ {print FILENAME":"NR":"$0}' $f >> groff_lint.log || true
+ done
+fi
+
+echo "mandoc check"
+# spit out ONLY error messages with mandoc:
+if existence mandoc;
+then
+ mandoc -T lint `find . -name \*\.[1-9]`
+fi
+
+#LC_ALL=en_US.UTF-8 MANROFFSEQ='' MANWIDTH=80 /run/current-system/profile/bin/man --warnings -E UTF-8 -l -Tutf8 -Z <*.5> >report5.log
+#LC_ALL=en_US.UTF-8 MANROFFSEQ='' MANWIDTH=80 /run/current-system/profile/bin/man --warnings -E UTF-8 -l -Tutf8 -Z <*.1> >report1.log
--- /dev/null
+#!/bin/sh
+# check python style (and 2 to 3 migration)
+#
+# behold, the worst lowest effort shell script
+# ...given that we have more generic checking
+# for executables in other scripts already
+
+existence()
+{
+ command -v "$1" >/dev/null 2>&1
+}
+
+# It is assumed that you are in 'lint'.
+LOGFILE="python-lint.log"
+
+# invoke from root of source!
+if [ $(basename $(pwd)) = "scripts" ]
+then
+ return 1
+else
+ if [ -e "${LOGFILE}" ]
+ then
+ rm ${LOGFILE}
+ fi
+
+ if existence python;
+ then
+ python --version >> ${LOGFILE}
+ fi
+
+ if existence python2;
+ then
+ python2 --version >> ${LOGFILE}
+ fi
+
+ if existence python3;
+ then
+ python3 --version >> ${LOGFILE}
+ fi
+
+ if existence python3.7;
+ then
+ python3.7 --version >> ${LOGFILE}
+ fi
+
+ if existence flake8;
+ then
+ echo >> ${LOGFILE}
+ echo "flake8:" >> ${LOGFILE}
+ echo >> ${LOGFILE}
+ flake8 >> ${LOGFILE}
+ fi
+
+ if existence flake8-3.7;
+ then
+ echo >> ${LOGFILE}
+ echo "flake8:" >> ${LOGFILE}
+ echo >> ${LOGFILE}
+ flake8-3.7 >> ${LOGFILE}
+ fi
+
+ if existence 2to3;
+ then
+ echo >> ${LOGFILE}
+ echo "2to3" >> ${LOGFILE}
+ echo >> ${LOGFILE}
+ 2to3 -v -d . >> ${LOGFILE}
+ 2to3 -v -p . >> ${LOGFILE}
+ fi
+
+ if existence 2to3-3.7;
+ then
+ echo >> ${LOGFILE}
+ echo "2to3" >> ${LOGFILE}
+ echo >> ${LOGFILE}
+ 2to3-3.7 -v -d . >> ${LOGFILE}
+ 2to3-3.7 -v -p . >> ${LOGFILE}
+ fi
+fi
+++ /dev/null
-;;;; hacks.el --- a few functions to help me work on the manual
-;;;; Jim Blandy <jimb@red-bean.com> --- October 1998
-;;;; -- imported from https://git.savannah.gnu.org/cgit/guile.git/tree/doc/hacks.el
-;;;; This code should be covered by the same license as GNU Guile (GPL3).
-
-(defun jh-exemplify-region (start end)
- (interactive "r")
- (save-excursion
- (save-restriction
- (narrow-to-region start end)
-
- ;; Texinfo doesn't handle tabs well.
- (untabify (point-min) (point-max))
-
- ;; Quote any characters special to texinfo.
- (goto-char (point-min))
- (while (re-search-forward "[{}@]" nil t)
- (replace-match "@\\&")))))