diff options
-rw-r--r-- | .SRCINFO | 6 | ||||
-rw-r--r-- | PKGBUILD | 4 | ||||
-rw-r--r-- | phreeqc.el | 13 |
3 files changed, 18 insertions, 5 deletions
@@ -1,9 +1,9 @@ # Generated by mksrcinfo v8 -# Sun Jan 22 19:36:12 UTC 2017 +# Sat Feb 4 18:52:49 UTC 2017 pkgbase = phreeqc pkgdesc = A Computer Program for Speciation, Batch-Reaction, One-Dimensional Transport, and Inverse Geochemical Calculations pkgver = 3.3.10 - pkgrel = 1 + pkgrel = 2 url = http://wwwbrr.cr.usgs.gov/projects/GWC_coupled/phreeqc/ install = install.sh arch = i686 @@ -16,7 +16,7 @@ pkgbase = phreeqc source = https://raw.githubusercontent.com/jaalto/project-emacs--folding-mode/master/folding.el md5sums = c78db4331a9eaa469fcbee36e69a2101 md5sums = 8facd6e784cd1985b2c57c092b753002 - md5sums = 0a5486d29b999e52dd8eb1bafd114699 + md5sums = 9418da9a10a0927516921c407288c039 md5sums = d262512bd4a19a68805914d35f8f9019 pkgname = phreeqc @@ -2,7 +2,7 @@ pkgname=phreeqc pkgver=3.3.10 _pkgsvn=12220 -pkgrel=1 +pkgrel=2 pkgdesc="A Computer Program for Speciation, Batch-Reaction, One-Dimensional Transport, and Inverse Geochemical Calculations" arch=('i686' 'x86_64') url="http://wwwbrr.cr.usgs.gov/projects/GWC_coupled/phreeqc/" @@ -25,7 +25,7 @@ source=("ftp://brrftp.cr.usgs.gov/pub/charlton/phreeqc/phreeqc-$pkgver-$_pkgsvn. "https://raw.githubusercontent.com/jaalto/project-emacs--folding-mode/master/folding.el") md5sums=('c78db4331a9eaa469fcbee36e69a2101' '8facd6e784cd1985b2c57c092b753002' - '0a5486d29b999e52dd8eb1bafd114699' + '9418da9a10a0927516921c407288c039' 'd262512bd4a19a68805914d35f8f9019') build() { diff --git a/phreeqc.el b/phreeqc.el index 5f80d3b26a28..0a7ec6986e73 100644 --- a/phreeqc.el +++ b/phreeqc.el @@ -52,6 +52,11 @@ :type 'string :group 'phreeqc) +(defcustom phreeqc-manual-fn "/usr/share/doc/phreeqc/Phreeqc_3_2013_manual.pdf" + "Name and path of the default thermodynamic database." + :type 'string + :group 'phreeqc) + (defcustom phreeqc-indent 4 "*This variable gives the indentation in Phreeqc-Mode." :type 'integer @@ -89,6 +94,8 @@ '("Visit Output" . phreeqc-visit-output)) (define-key menu-map [phreeqc-compile] '("Run Phreeqc" . phreeqc-compile)) + (define-key menu-map [phreeqc-manual] + '("Phreeqc manual" . phreeqc-visit-manual)) (setq phreeqc-mode-map map))) (defvar phreeqc-output-mode-map nil @@ -488,6 +495,12 @@ with no args, if that value is non-nil." (concat (file-name-sans-extension buffer-file-name) ".out")) (phreeqc-output-mode)) +(defun phreeqc-visit-manual () + "Visit PhreeqC v3 manual" + (interactive) + (find-file-other-frame phreeqc-manual-fn)) + + (defun phreeqc-next-output-fold () "Visit output from Phreeqc-Simulation and move cursor to next fold." (interactive) |