jmercouris

2018/10/28 15:25:30 [error] 72332#100398: *1 connect() to 127.0.0.1:9001 failed (61: Connection refused) while connecting to upstream, client: 92.226.165.28, server: source.atlas.engineer, request: "GET /git/next/info/refs?service=git-upload-pack HTTP/1.1", upstream: "fastcgi://127.0.0.1:9001", host: "source.atlas.engineer"
2018/10/28 15:25:30 [error] 72332#100398: *1 connect() to [::1]:9001 failed (61: Connection refused) while connecting to upstream, client: 92.226.165.28, server: source.atlas.engineer, request: "GET /git/next/info/refs?service=git-upload-pack HTTP/1.1", upstream: "fastcgi://[::1]:9001", host: "source.atlas.engineer"
2018/10/28 15:25:32 [error] 72332#100398: *4 no live upstreams while connecting to upstream, client: 92.226.165.28, server: source.atlas.engineer, request: "GET /git/next/info/refs?service=git-upload-pack HTTP/1.1", upstream: "fastcgi://localhost", host: "source.atlas.engineer"

jmercouris

        location ~ /git(/.*) {
            # fcgiwrap is set up to listen on this host:port
            fastcgi_pass  localhost:9001;
            include       fastcgi_params;
            fastcgi_param SCRIPT_FILENAME /usr/local/libexec/git-core/git-http-backend;
            # export all repositories under GIT_PROJECT_ROOT
            fastcgi_param GIT_HTTP_EXPORT_ALL "";
            fastcgi_param GIT_PROJECT_ROOT /home/git/public/;
            fastcgi_param PATH_INFO $uri;
        }

jmercouris

(defroute ("/create/component" :method :POST) (&key |name| |material| |machine-time| |file|)
  (with-logged-in
    (let* ((filename (concatenate 'string
                                  (hash-password (write-to-string (id (get-user (gethash :email *session*)))))
                                  (gethash "filename" (second |file|))))
           (data (slot-value (first |file|) 'flexi-streams::vector))
           (file-path (merge-pathnames filename *data-storage-directory*))
           (material (first |material|))
           (machine-time (first |machine-time|))
           (name (first |name|)))

jmercouris

(require 'nnir)

;; personal Information
(setq user-full-name "John Mercouris"
      user-mail-address "[email protected]")
(setq mml2015-signers '("A1AB09DB505BC4B8")
      mml2015-encrypt-to-self t)

;; setup mail accounts
(setq gnus-select-method

jmercouris

       0: nnfolder+archive:Archive
       0: Archive
       0: Deleted Messages
       0: Drafts
       0: INBOX
       0: Sent Messages
       0: nndraft:drafts

jmercouris

2018-10-11T03:32:47Z jcowan: I'm looking to get generic functions without classes into Scheme
2018-10-11T03:35:35Z patche joined #lisp
2018-10-11T03:36:27Z DGASAU joined #lisp
2018-10-11T03:39:07Z anewuser quit (Quit: anewuser)
2018-10-11T03:39:30Z beach: If you have no classes, what would the methods specialize on?
2018-10-11T03:44:18Z Jach[m] joined #lisp

jmercouris

virtio_pci0: <VirtIO PCI Network adapter> port 0xc100-0xc11f mem 0xfd052000-0xfd052fff irq 11 at device 3.0 on pci0
virtio_pci1: <VirtIO PCI SCSI adapter> port 0xc000-0xc03f mem 0xfd053000-0xfd053fff irq 11 at device 4.0 on pci0
virtio_pci2: <VirtIO PCI Block adapter> port 0xc040-0xc07f mem 0xfd054000-0xfd054fff irq 10 at device 5.0 on pci0
virtio_pci3: <VirtIO PCI Block adapter> port 0xc080-0xc0bf mem 0xfd055000-0xfd055fff irq 10 at device 6.0 on pci0
virtio_pci4: <VirtIO PCI Balloon adapter> port 0xc120-0xc13f irq 11 at device 7.0 on pci0

jmercouris

WEB> last-request
#S(LACK.REQUEST:REQUEST
   :ENV (:LACK.SESSION.OPTIONS
         (:ID "c63c88cc4ceaefcf2891e6a5da195b6e59500e2a" :NEW-SESSION NIL
          :CHANGE-ID NIL :EXPIRE NIL)
         :LACK.SESSION #<HASH-TABLE :TEST EQUAL :COUNT 2 {1009835303}>
         :REQUEST-METHOD :POST :SCRIPT-NAME "" :PATH-INFO "/create/component"
         :SERVER-NAME "localhost" :SERVER-PORT 5000 :SERVER-PROTOCOL :HTTP/1.1
         :REQUEST-URI "/create/component" :URL-SCHEME "http" ...)
   :METHOD :POST

jmercouris

static xmlrpc_value *
window_delete(xmlrpc_env * const envP,
            xmlrpc_value * const paramArrayP,
            void *         const serverInfo,
            void *         const channelInfo) {
    void *windowId;
    xmlrpc_decompose_value(envP, paramArrayP, "(s)", &windowId);
    dispatch_async(dispatch_get_main_queue(), ^{
        NextApplicationDelegate *delegate = [NSApp delegate];
        [delegate windowClose: [NSString stringWithFormat:@"%s", windowId]];

jmercouris

// RETURNS EXEC BAD ACCESS /////////////////////////////////////////////

- (bool)windowClose:(NSString *)key
{
    NSWindow *window = [[self windows] objectForKey:key];
    [[self windows] removeObjectForKey:key];
    [window close];
    return YES;
}