Mercurial > hg > amuse

view implementations/geerdes/connect.lisp @ 150:b8c73a9b9c10

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
fix gsharp import for class changes make-tempo -> make-standard-tempo-period darcs-hash:20071102170205-dc3a5-5ce9aa7aa6571001c360309e837003a83544046a.gz
author c.rhodes <c.rhodes@gold.ac.uk>
date Fri, 02 Nov 2007 17:02:05 +0000
parents c8db9d1bd191
children 3b588c566734
line wrap: on
line source
(in-package #:amuse-geerdes)

;; N.B. This file contains an access password for the database in
;; plain text...

(defun get-amuse-connection ()
  (clsql:connect '("vaughan-williams.doc.gold.ac.uk" "amuse" "LispMidi" "clsql")
		 :if-exists :old :database-type :mysql))

;; might as well connect while I'm at it 
;; or not 
;; (get-amuse-connection)