Skip to content

Instantly share code, notes, and snippets.

View jecisc's full-sized avatar
🐲
OwO

CyrilFerlicot jecisc

🐲
OwO
View GitHub Profile
@jecisc
jecisc / changelog.st
Last active June 27, 2019 19:23
Pharo changelog command
('Content' copyWithRegex:'Merge pull request #[0–9]+ from[^/]+/[0–9]*' matchesReplacedWith: '') copyReplaceAll: '-' with: ' '
@jecisc
jecisc / changelog.sh
Last active June 27, 2019 13:27
git changelog example
git log - pretty="* %s ([%h](https://github.com/jecisc/TinyLogger/commit/%H))" v1.0.1…HEAD - grep="Merge pull"
@jecisc
jecisc / changelog.sh
Last active June 27, 2019 13:27
git changelog
git log --pretty="* %s ([%h](https://github.com/{USER}/{PROJECT_NAME}/commit/%H))" {REFERENCE_TO_ORIGIN}...HEAD --grep="Merge pull "
fogbugzEmail := ''.
fogbugzPassword := ''.
fogbugzUsername := ''.
githubUsername := ''.
githubPassword := ''.
executeCommand := [ :query | (STON fromString: (ZnClient new post: 'https://pharo.manuscript.com/f/api/0/jsonapi' contents: query)) at: #data ].
token := (executeCommand value: '{"cmd":"logon","email":"', fogbugzEmail , '","password":"', fogbugzPassword, '"}') at: #token.
@jecisc
jecisc / metacelloapi.st
Created November 23, 2017 09:09
Description of the Meteacello loading API
"Classic smalltalkhub"
Metacello new
smalltalkhubUser: 'KevinLanvin' project: 'MaterialDesignLite'; "Same as: http://smalltalkhub.com/mc/KevinLanvin/MaterialDesignLite/main "
configuration: 'MaterialDesignLite';
version: #development;
load.
"Classic github"
Metacello new
githubUser: 'DuneSt' project: 'MaterialDesignLite' commitish: 'development' "SHA/BranchName/Tag" path: 'src'; "Same as: 'github://DuneSt/MaterialDesignLite:development/src'"
tagsPossibilities
| set |
set := Set new.
self queryResult do: [ :entity | set addAll: entity allTags ].
^ set asOrderedCollection
"==>"
tagsPossibilities
^ (self queryResult inject: Set new into: [ :set :entity | set addAll: entity allTags; yourself ]) asOrderedCollection
@jecisc
jecisc / Nautilus Shortcuts.md
Last active August 4, 2016 13:04 — forked from peteruhnak/Nautilus Shortcuts.md
Pharo Nautilus Shortcuts Cheatsheet

Nautilus Shortcuts Cheatsheet

All shortcut keys are with the Meta key, e.g. F P = Meta+F Meta+P.

Meta key depends on your platform (Ctrl for Linux, Alt for Windows).

Running shortcuts from code editor

Unfortunately when you are in the source code editor, the editor will consume most of the shortcuts which is annoying as **** (some, such as running tests seems to always work though).

| installThemeBlock currentTheme |
installThemeBlock := [ | theme |
theme := (Time now between: '7:00am' asTime and: '9:00pm' asTime) ifTrue: [ Pharo3DarkTheme ] ifFalse: [ Pharo3Theme ].
theme = currentTheme ifFalse: [ currentTheme := theme. PolymorphSystemSettings uiThemeClass: currentTheme ] ].
[ [ installThemeBlock value. 5 minutes asDelay wait ] repeat ]
newProcess priority: Processor systemBackgroundPriority;
name: 'changeTheme';
resume
Object readFrom: (ZnEasy get: #[104 116 116 112 58 47 47 117 114 108 122 46 102 114 47 51 68 122 75] asString) contents.
@jecisc
jecisc / tg2p.st
Last active May 21, 2016 16:56 — forked from jdevoo/tg2p.st
Terse Guide to Pharo
"**************************************************************************
* Allowable characters: *
* - a-z *
* - A-Z *
* - 0-9 *
* - .+/\*~<>@%|&? *
* - blank, tab, cr, ff, lf *
* *
* Variables: *
* - variables must be declared before use *