/prog/ - Guess the snippet

Name: Anonymous 2010-05-22 9:26

I'll start



(defconst *path-delimiter* ">")

(defconst *type-delimiter* ".")

(defconst *version-delimiter* ".")

(defconst *directory-entry-file-type-max-length* 14.)

(defconst *lmfs-name-of-the-root* "The Root Directory")



(defflavor lmfs-mailbox-pathname-mixin () (mailbox-pathname-mixin)

  (:abstract-flavor)

  (:documentation :mixin "for ZMAIL's methods"))



(defflavor lmfs-pathname-mixin

    ()

    (lmfs-mailbox-pathname-mixin

     no-device-mixin

     hierarchical-directory-mixin

     meaningful-root-mixin

     both-cases-same-lower-preferred-mixin)

  (:required-flavors pathname)

  (:functions lmfs-pathname-fname-string))    ;This one is forward-referenced

Name: Anonymous 2010-05-22 14:39



void

load_uri_imp(gchar *uri) {

    GString* newuri;

    if (g_strstr_len (uri, 11, "javascript:") != NULL) {

        eval_js(uzbl.gui.web_view, uri, NULL);

        return;

    }

    newuri = g_string_new (uri);

    if (!soup_uri_new(uri)) {

        GString* fullpath = g_string_new ("");

        if (g_path_is_absolute (newuri->str))

            g_string_assign (fullpath, newuri->str);

        else {

            gchar* wd;

            wd = g_get_current_dir ();

            g_string_assign (fullpath, g_build_filename (wd, newuri->str, NULL));

            free(wd);

        }

        struct stat stat_result;

        if (! g_stat(fullpath->str, &stat_result)) {

            g_string_prepend (fullpath, "file://");

            g_string_assign (newuri, fullpath->str);

        }

        else

            g_string_prepend (newuri, "http://");

        g_string_free (fullpath, TRUE);

    }

    /* if we do handle cookies, ask our handler for them */

    webkit_web_view_load_uri (uzbl.gui.web_view, newuri->str);

    g_string_free (newuri, TRUE);

}

Guess the snippet

1 Name: Anonymous 2010-05-22 9:26

15 Name: Anonymous 2010-05-22 14:39

Name: Anonymous 2010-05-22 9:26

Name: Anonymous 2010-05-22 14:39