Phillip Smith phillipadsmith
phillipadsmith
/ gist:101340
Created
April 24, 2009 20:45
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| print "hello, world"; |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| <% $paragraph %> | |
| <%INIT> | |
| my %embeds = (); | |
| # Get paragraph with markup language | |
| my $markup = $element->get_data('paragraph'); | |
| # Store embedded elements in a hash | |
| foreach my $e ($element->get_elements) { | |
| if ($e->has_name('embed_related_image')) { |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| <% $paragraph %> | |
| <%INIT> | |
| my %embeds = (); | |
| # Get paragraph with markup language | |
| my $markup = $element->get_data('paragraph'); | |
| # Store embedded elements in a hash | |
| foreach my $e ($element->get_elements) { | |
| if ($e->has_name('embed_related_image')) { |
phillipadsmith
/ paragraph.mc
Created
April 24, 2009 23:36
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| <%perl>; | |
| foreach my $e ( $element->get_elements(qw(paragraph))) { | |
| $m->print('<p>', $e->get_data, "</p>\n"); | |
| } | |
| </%perl> |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| <html> | |
| <body> | |
| % $burner->chain_next; | |
| </body> | |
| </html> |
phillipadsmith
/ delete-all.user.js
Created
April 24, 2009 23:41
Allows you to check all of the delete checkboxes in the Story Profile
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| // ==UserScript== | |
| // @name Bricolage Delete All | |
| // @namespace http://wiki.bricolage.cc/greasemonkey | |
| // @description Allows you to check all of the delete checkboxes in the Story Profile | |
| // @include * | |
| // ==/UserScript== | |
| (function () { | |
| var spans = document.getElementsByTagName("span"); |
phillipadsmith
/ briccatsearch.user.js
Created
April 24, 2009 23:42
Search-as-you-type interface for Bricolage categories.
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| // ==UserScript== | |
| // @name Bricolage category search | |
| // @namespace http://wiki.bricolage.cc/greasemonkey | |
| // @description Search-as-you-type interface for Bricolage categories. Works for "New Story", "New Media", and "New Category" pages. | |
| // @include */workflow/profile/*/new/* | |
| // @include */admin/profile/category | |
| // ==/UserScript== | |
| // Create an object, used below | |
| var CatSearch = { |
phillipadsmith
/ Delete old site groups
Created
April 25, 2009 01:03
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| UPDATE "grp" | |
| SET "active" = 'FALSE' | |
| WHERE "name" ~ '2nd test site' |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| update member | |
| set active = True | |
| where id in ( | |
| select distinct sc.member__id | |
| from story__contributor sc | |
| inner join story_instance si on sc.story_instance__id = si.id | |
| where si.story__id = ID OF YOUR STORY | |
| ); |
phillipadsmith
/ gist:101436
Created
April 25, 2009 01:04
Display the first-level elements of a story given its 'id'
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| SELECT f.id,ft.name,ft.key_name,f.place,f.object_order | |
| FROM story_field f,field_type ft | |
| WHERE f.field_type__id = ft.id and ft.active = 't' | |
| and f.parent_id = ( | |
| select t.id from story_element t,element_type et,at_type at | |
| where t.element_type__id=et.id and t.active='t' and et.active='t' | |
| and et.type__id=at.id and t.object_instance_id = ( | |
| select max(id) from story_instance where story__id = 50706 | |
| ) | |
| and at.top_level='t' |
OlderNewer