Buenos días, antes que nada quiero agradecerte por compartir tus conocimientos, por otro lado quiero pedir tu apoyo, puesto que he subido los archivos y he creado las bases de datos, así mismo cambie las claves y accesos a la base de datos en global, pero me marca error (refused!) lo que me falto por cambiar fue $base_path que originalmente tenia http://127.0.0.1/lector/ o algo así, no se si deba dejarlo así o cambiarle algo pero no puedo pasar de ahí, la pagina aparece en blanco, de verdad espero puedas ayudarme, de antemano muchas gracias, por cierto se pretende utilizar un lector digitalpersona 4500 pero por ahora solo tengo el lector que viene en la laptop lenovo, crees que pueda utilizar el sistema para ambos lectores? Gracias, saludos y bendiciones.


Ide o to, že program predpĺňa číslo firmy. Čiže napr. na doméne majú firmy 235 až 587. Program urobí skušobnú s číslom 5007. A keď dá užívateľ nová účtovná jednotka, tak program predplní 5008. Užívateľ nevšimne a dá uložiť. Neskôr zistí, že uložil číslo, ktoré nechcel. Predpĺňanie má význam, keď ulahčí prácu. Lenže to by tam nemohla byť firma úplne mimo radu. Napr. na montosucto nemá skúšobná firma. V tomto prípade je lepšie program nepredpĺňal. Nechápem význam skúšobných firiem = nie sú dáta + mätúce predpĺňanie číslo firmy.


Open your GitHub repository in your browser and click on new-file.txt. In there you should see the content, which you have written. On the last screenshot, you can see the commit message is written in the second column of the commit you have made.


That's perfectly understandable, but this was committed in March 2015 - I was just concerned it had slipped through a net somewhere.


Sure I can now accept review after is it more or less visible what is copy pasted and what is out addition.


Давай тогда так
`var EVENTS_REG_EXP = /(\s)on(mousedown|mouseover|mouseout|mouseup|keydown|keypress|focus|blur|click)\s*=\s*(("|').*?\4))/gi`


How does this initialize the "item" member of "struct mru" and shouldn't the above be static too?


Do we want to lock this down to our office?


See https://www.youtube.com/watch?v=jTmXHvGZiSY


Yes this needs to be changed from the fourth to fifth.


Done.


@litespeedmarc So my use case is slightly different in that I'm using the existing membership but have a number of additional line items some of which are required, some optional via the priceset.

1. Without any customisations it is not possible to select a priceset during membership renewal - this is the part I require.
2. As 1, I do require price-set renewals, but the actual membership being renewed does not change, it's other line items on the price set that do.

Your patch (with my tweaks) is currently essential for my client.  Would it help if I setup a demo site for you to see what I mean?


@rajagp wondering if the code from this line onwards could be move to another file called `AirportService` or `AirportRepository`?  The `fetchAirportsMatching` method would then use that other class to get the result and send it back to the view. As I understand it, the presenter acts as the glue between the view and model (`AirportService` or `AirportRepository` could be the model in this case). It might also help us to isolate the code to the Couchbase Lite API/Python REST API (the most relevant code for attendees).


The following doc(s) have been deployed to the [deprecation](https://deprecation-static-docs.pantheonsite.io/docs) Multidev environment:
- [app/config/sculpin_site.yml](https://github.com/pantheon-systems/documentation/commit/d3f54e28d284b3aaa18b3b7a7454fa7bf2ebe864/app/config/sculpin_site.yml)
- [/docs/guides/wordpress-automated-testing](https://deprecation-static-docs.pantheonsite.io/docs/guides/wordpress-automated-testing)
- [source/_views/doc.html](https://github.com/pantheon-systems/documentation/commit/d3f54e28d284b3aaa18b3b7a7454fa7bf2ebe864/source/_views/doc.html)
- [source/docs/assets/css/main.css](https://github.com/pantheon-systems/documentation/commit/d3f54e28d284b3aaa18b3b7a7454fa7bf2ebe864/source/docs/assets/css/main.css)


Should this also be !Ref BastionInstanceCount?


The following doc(s) have been deployed to the [deprecation](https://deprecation-static-docs.pantheonsite.io/docs) Multidev environment:
- [app/config/sculpin_site.yml](https://github.com/pantheon-systems/documentation/commit/15d03a1732ab626bd337c65e3f17638a7d3a585d/app/config/sculpin_site.yml)
- [/docs/guides/wordpress-automated-testing](https://deprecation-static-docs.pantheonsite.io/docs/guides/wordpress-automated-testing)
- [source/_views/doc.html](https://github.com/pantheon-systems/documentation/commit/15d03a1732ab626bd337c65e3f17638a7d3a585d/source/_views/doc.html)
- [source/docs/assets/css/main.css](https://github.com/pantheon-systems/documentation/commit/15d03a1732ab626bd337c65e3f17638a7d3a585d/source/docs/assets/css/main.css)


You need to use `,` instaead of `;`.
tplPromise is being _undefined_

cheers


I'm not sure what you mean, my updates never checked for existence.


Can we use something in `/dev/input/by-id/`?


bb78377  on 30 Sep 2016
￼ alan-cruz2 fallback ไปยังหน้าต่างถ้า `this` is undefined


![screen shot 2017-08-03 at 12 43 20 pm](https://user-images.githubusercontent.com/32282086/30871309-9aa81ccc-a310-11e7-9960-1103aa377066.png)


Well Done. Did I get better?


Yeah, these should not have had a colon in the page references -- I totally missed that. If you could clean that up, I'd appreciate it.


@SuzukiYuka
インデント崩れきになる...気にしすぎかもなんだけど....
フォーマットは忘れちゃうし，セーブした時にフォーマットするようにすると良いかもしれない
![2017-09-27 1 15 10](https://user-images.githubusercontent.com/15684002/30871400-bcf6793e-a321-11e7-8f80-9567e9dc3549.jpg)


Комит дальше, там все исправлено.


The code in openstack-novalxd/steps/step-02_glance that calls apt-add-repository, I believe is echoed to a temp file, from line 7 to 12, but line 13 will overwrite those changes, so the code is never executed. Right?


Pawed! LOL!


可以


Fixed! Indeed the ob_flush() function shouldn't be called when the script
is run from the command line.

Thank you!

------------------------------
<http://www.daniloaz.com>
------------------------------
Email: daniloaz@gmail.com
Skype ID: daniloaz34
Web: http://www.daniloaz.com <http://www.azanweb.com>

2017-09-26 17:07 GMT+02:00 perrinewton <notifications@github.com>:

> Thank, works, but gives this error:
> Notice: ob_flush(): failed to flush buffer. No buffer to flush in
> /home/larrainn/public_html/modulos/backup-mysql2.php on line 252
>
> I just deleted ob_flush and no more error
>
> —
> You are receiving this because you authored the thread.
> Reply to this email directly, view it on GitHub
> <https://github.com/daniloaz/myphp-backup/commit/da5df5795dc982d78f4d9f660b45b570e8553312#commitcomment-24574824>,
> or mute the thread
> <https://github.com/notifications/unsubscribe-auth/ABRQNv6NFeifjPCV-rPtudbh9qX9T6xeks5smRNKgaJpZM4Pj_dd>
> .
>


new


That's an innovative technology...!


@ryosebach あれーー、ほんとだ。ctrl iまとめてしたんだけどなぁ。。。Editer上だと崩れないからやっかいだ><
設定変えてみる！ありがとう！


Why did you need this?


error에 대한건 if로 처리하는게 더 깔끔한것 같아요
```swift
if let error = error {
  DataRequest.errorMessage(response, error: error, data: data)
  return .failure(error)
}
```


it's better to document somewhere.. My code suddenly stopped working, until I found this.


@seckroth Oh my, these were awful errors! Thank you for catching them! What first clued you in, might I ask?


some font-end template engine will use this attr:
type="text/html"
type="text/plain"
type="text/x-template"
...


Vert.x comes with a Json parser so I'd rather not make the user think he/she needs anything else. Would you be fine if I remove JsonSimple?


Bluemix [toolchain](https://console.bluemix.net/devops/toolchains/7d5420da-c653-4a8c-a433-e0a421ac3723 "parkly-deliverypipeline"): [Delivery Pipeline](https://console.bluemix.net/devops/pipelines/ca772105-1e2f-40d4-9243-aa4ed15906e4 "parkly-delivery") deployed [parkly](https://github.com/IagoGodoy/parkly/releases/tag/deploy-ibm-yp-us-south-iago1157teste-each-20170926-162809 "deploy-ibm-yp-us-south-iago1157teste-each-20170926-162809") to [each](https://console.bluemix.net/apps/c3e2118e-dd89-4509-bfb9-60372d850b4f?env_id=ibm:yp:us-south "ibm:yp:us-south:iago1157teste:each"), including this commit


@alyxrossetti we should avoid the hardcoded url. We can use the name of route and pass in params like this:
`
this.$router.push({ name: 'CollectionHome', params: { slug: this.collection._slug }})
`


why ;_;


![](https://github.trello.services/images/mini-trello-icon.png) [Text On Page #Sprint16](https://trello.com/c/EQgq8hVk/304-text-on-page-sprint16)


저는 이런 경우 guard로 처리하긴 합니다.


| ERROR: oe_runmake failed
| make: *** No rule to make target 'install'.  Stop.
| WARNING: /home/oe1/atv61/build-enviroment/builds/openatv/release/sf4008/tmp/work/cortexa15hf-neon-vfpv4-oe-linux-gnueabi/enigma2-plugin-systemplugins-plexdvrapi/2.2+gitAUTOINC+f382f812e6-r0/temp/run.do_install.5843:1 exit 1 from 'exit 1'
| ERROR: Function failed: do_install (log file is located at /home/oe1/atv61/build-enviroment/builds/openatv/release/sf4008/tmp/work/cortexa15hf-neon-vfpv4-oe-linux-gnueabi/enigma2-plugin-systemplugins-plexdvrapi/2.2+gitAUTOINC+f382f812e6-r0/temp/log.do_install.5843)

Summary: 1 task failed:
  /home/oe1/atv61/build-enviroment/meta-oe-alliance/meta-oe/recipes-mediacenter/plex/enigma2-plugin-systemplugins-plexdvrapi.bb:do_install
this break all images


[R/Authentication.R:1:3:](https://github.com/RTMC/tmc-r/blob/cb4ae20402f066b36e80c67b920ab8db2a87c70a/R/Authentication.R#L1) *style:* **Commented code should be removed.**
```r
# install.packages("rjson")
  ^~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/Authentication.R:2:3:](https://github.com/RTMC/tmc-r/blob/cb4ae20402f066b36e80c67b920ab8db2a87c70a/R/Authentication.R#L2) *style:* **Commented code should be removed.**
```r
# install.packages("httr")
  ^~~~~~~~~~~~~~~~~~~~~~~~
```
[R/Authentication.R:5:1:](https://github.com/RTMC/tmc-r/blob/cb4ae20402f066b36e80c67b920ab8db2a87c70a/R/Authentication.R#L5) *style:* **Lines should not be more than 80 characters.**
```r
# https://developer.salesforce.com/docs/atlas.en-us.api_rest.meta/api_rest/intro_understanding_username_password_oauth_flow.htm
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/Authentication.R:7:1:](https://github.com/RTMC/tmc-r/blob/cb4ae20402f066b36e80c67b920ab8db2a87c70a/R/Authentication.R#L7) *style:* **Lines should not be more than 80 characters.**
```r
  client_id <- "d56662a9898966d8275edb2e609bf1c52919ca7a4e3797bd663e40833522ab3b"
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/Authentication.R:9:1:](https://github.com/RTMC/tmc-r/blob/cb4ae20402f066b36e80c67b920ab8db2a87c70a/R/Authentication.R#L9) *style:* **Lines should not be more than 80 characters.**
```r
  body <- paste(sep = "", "grant_type=password&client_id=", client_id, "&client_secret=", secret,"&username=",
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/Authentication.R:9:98:](https://github.com/RTMC/tmc-r/blob/cb4ae20402f066b36e80c67b920ab8db2a87c70a/R/Authentication.R#L9) *style:* **Commas should always have a space after.**
```r
  body <- paste(sep = "", "grant_type=password&client_id=", client_id, "&client_secret=", secret,"&username=",
                                                                                ^
```
[R/Authentication.R:12:10:](https://github.com/RTMC/tmc-r/blob/cb4ae20402f066b36e80c67b920ab8db2a87c70a/R/Authentication.R#L12) *warning:* **no visible global function definition for ‘POST’**
```r
  req <- POST(url = "https://tmc.mooc.fi/oauth/token", body = body)
         ^~~~
```
[R/Authentication.R:14:5:](https://github.com/RTMC/tmc-r/blob/cb4ae20402f066b36e80c67b920ab8db2a87c70a/R/Authentication.R#L14) *style:* **Place a space before left parenthesis, except in a function call.**
```r
  if(status_code(req)==200){
    ^
```
[R/Authentication.R:14:22:](https://github.com/RTMC/tmc-r/blob/cb4ae20402f066b36e80c67b920ab8db2a87c70a/R/Authentication.R#L14) *style:* **Put spaces around all infix operators.**
```r
  if(status_code(req)==200){
                    ~^~~
```
[R/Authentication.R:16:5:](https://github.com/RTMC/tmc-r/blob/cb4ae20402f066b36e80c67b920ab8db2a87c70a/R/Authentication.R#L16) *warning:* **no visible global function definition for ‘stop_for_status’**
```r
    stop_for_status(x = req, task = "Authenticate with TMC")
    ^~~~~~~~~~~~~~~
```
[R/Authentication.R:17:30:](https://github.com/RTMC/tmc-r/blob/cb4ae20402f066b36e80c67b920ab8db2a87c70a/R/Authentication.R#L17) *warning:* **no visible global function definition for ‘content’, Did you mean 'confint'?**
```r
    token <- paste("Bearer", content(req)$access_token)
                             ^~~~~~~
```
[R/Authentication.R:21:12:](https://github.com/RTMC/tmc-r/blob/cb4ae20402f066b36e80c67b920ab8db2a87c70a/R/Authentication.R#L21) *style:* **Remove spaces before the left parenthesis in a function call.**
```r
    return (content(req))
           ^
```
[R/Authentication.R:21:13:](https://github.com/RTMC/tmc-r/blob/cb4ae20402f066b36e80c67b920ab8db2a87c70a/R/Authentication.R#L21) *warning:* **no visible global function definition for ‘content’, Did you mean 'confint'?**
```r
    return (content(req))
            ^~~~~~~
```
[R/Authentication.R:29:1:](https://github.com/RTMC/tmc-r/blob/cb4ae20402f066b36e80c67b920ab8db2a87c70a/R/Authentication.R#L29) *style:* **Lines should not be more than 80 characters.**
```r
# Temporary testing/example function that fetches the data of a single course from TMC
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/Authentication.R:30:1:](https://github.com/RTMC/tmc-r/blob/cb4ae20402f066b36e80c67b920ab8db2a87c70a/R/Authentication.R#L30) *style:* **Variable or function name should be snake_case.**
```r
tempGetCourse <- function(token) {
^~~~~~~~~~~~~
```
[R/Authentication.R:33:10:](https://github.com/RTMC/tmc-r/blob/cb4ae20402f066b36e80c67b920ab8db2a87c70a/R/Authentication.R#L33) *warning:* **no visible global function definition for ‘GET’, Did you mean 'T'?**
```r
  req <- GET(url = url, config = add_headers(Authorization = token))
         ^~~
```
[R/Authentication.R:33:34:](https://github.com/RTMC/tmc-r/blob/cb4ae20402f066b36e80c67b920ab8db2a87c70a/R/Authentication.R#L33) *warning:* **no visible global function definition for ‘add_headers’**
```r
  req <- GET(url = url, config = add_headers(Authorization = token))
                                 ^~~~~~~~~~~
```
[R/Authentication.R:34:3:](https://github.com/RTMC/tmc-r/blob/cb4ae20402f066b36e80c67b920ab8db2a87c70a/R/Authentication.R#L34) *warning:* **no visible global function definition for ‘stop_for_status’**
```r
  stop_for_status(x = req, task = "Fetching data from the TMC API")
  ^~~~~~~~~~~~~~~
```
[R/Authentication.R:35:13:](https://github.com/RTMC/tmc-r/blob/cb4ae20402f066b36e80c67b920ab8db2a87c70a/R/Authentication.R#L35) *warning:* **no visible global function definition for ‘content’, Did you mean 'confint'?**
```r
  course <- content(req)
            ^~~~~~~
```
[R/Authentication.R:41:1:](https://github.com/RTMC/tmc-r/blob/cb4ae20402f066b36e80c67b920ab8db2a87c70a/R/Authentication.R#L41) *style:* **Variable or function name should be snake_case.**
```r
tempGetAllCourses <- function(token, org_id) {
^~~~~~~~~~~~~~~~~
```
[R/Authentication.R:42:1:](https://github.com/RTMC/tmc-r/blob/cb4ae20402f066b36e80c67b920ab8db2a87c70a/R/Authentication.R#L42) *style:* **Lines should not be more than 80 characters.**
```r
  url <- paste("https://tmc.mooc.fi/api/v8/core/org/", org_id, "/courses", sep = "")
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/Authentication.R:43:5:](https://github.com/RTMC/tmc-r/blob/cb4ae20402f066b36e80c67b920ab8db2a87c70a/R/Authentication.R#L43) *style:* **Commented code should be removed.**
```r
  # url <- "https://tmc.mooc.fi/api/v8/core/org/hy/courses"
    ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/Authentication.R:46:10:](https://github.com/RTMC/tmc-r/blob/cb4ae20402f066b36e80c67b920ab8db2a87c70a/R/Authentication.R#L46) *warning:* **no visible global function definition for ‘GET’, Did you mean 'T'?**
```r
  req <- GET(url = url, config = add_headers(Authorization = token))
         ^~~
```
[R/Authentication.R:46:34:](https://github.com/RTMC/tmc-r/blob/cb4ae20402f066b36e80c67b920ab8db2a87c70a/R/Authentication.R#L46) *warning:* **no visible global function definition for ‘add_headers’**
```r
  req <- GET(url = url, config = add_headers(Authorization = token))
                                 ^~~~~~~~~~~
```
[R/Authentication.R:47:3:](https://github.com/RTMC/tmc-r/blob/cb4ae20402f066b36e80c67b920ab8db2a87c70a/R/Authentication.R#L47) *warning:* **no visible global function definition for ‘stop_for_status’**
```r
  stop_for_status(x = req, task = "Fetching data from the TMC API")
  ^~~~~~~~~~~~~~~
```
[R/Authentication.R:48:14:](https://github.com/RTMC/tmc-r/blob/cb4ae20402f066b36e80c67b920ab8db2a87c70a/R/Authentication.R#L48) *warning:* **no visible global function definition for ‘content’, Did you mean 'confint'?**
```r
  courses <- content(req)
             ^~~~~~~
```
[R/Authentication.R:54:1:](https://github.com/RTMC/tmc-r/blob/cb4ae20402f066b36e80c67b920ab8db2a87c70a/R/Authentication.R#L54) *style:* **Trailing blank lines are superfluous.**
```r

^
```
[R/Example.R:1:1:](https://github.com/RTMC/tmc-r/blob/cb4ae20402f066b36e80c67b920ab8db2a87c70a/R/Example.R#L1) *style:* **Variable or function name should be snake_case.**
```r
returnsTrue <- function() {
^~~~~~~~~~~
```
[R/TMC_plugin.R:7:1:](https://github.com/RTMC/tmc-r/blob/cb4ae20402f066b36e80c67b920ab8db2a87c70a/R/TMC_plugin.R#L7) *style:* **Variable or function name should be snake_case.**
```r
loginGadget <- function() {
^~~~~~~~~~~
```
[R/TMC_plugin.R:70:16:](https://github.com/RTMC/tmc-r/blob/cb4ae20402f066b36e80c67b920ab8db2a87c70a/R/TMC_plugin.R#L70) *style:* **Use <-, not =, for assignment.**
```r
      response = authenticate(input$username,input$password)
               ^
```
[R/TMC_plugin.R:70:18:](https://github.com/RTMC/tmc-r/blob/cb4ae20402f066b36e80c67b920ab8db2a87c70a/R/TMC_plugin.R#L70) *warning:* **no visible global function definition for ‘authenticate’**
```r
      response = authenticate(input$username,input$password)
                 ^~~~~~~~~~~~
```
[R/TMC_plugin.R:70:46:](https://github.com/RTMC/tmc-r/blob/cb4ae20402f066b36e80c67b920ab8db2a87c70a/R/TMC_plugin.R#L70) *style:* **Commas should always have a space after.**
```r
      response = authenticate(input$username,input$password)
                                             ^
```
[R/TMC_plugin.R:72:17:](https://github.com/RTMC/tmc-r/blob/cb4ae20402f066b36e80c67b920ab8db2a87c70a/R/TMC_plugin.R#L72) *style:* **Only use double-quotes.**
```r
      if (grepl('Bearer',response[1])) {
                ^~~~~~~~
```
[R/TMC_plugin.R:72:26:](https://github.com/RTMC/tmc-r/blob/cb4ae20402f066b36e80c67b920ab8db2a87c70a/R/TMC_plugin.R#L72) *style:* **Commas should always have a space after.**
```r
      if (grepl('Bearer',response[1])) {
                         ^
```
[R/TMC_plugin.R:81:7:](https://github.com/RTMC/tmc-r/blob/cb4ae20402f066b36e80c67b920ab8db2a87c70a/R/TMC_plugin.R#L81) *warning:* **no visible global function definition for ‘showDialog’**
```r
      showDialog(title = title, message = message, url = "")
      ^~~~~~~~~~
```
[R/TMC_plugin.R:84:1:](https://github.com/RTMC/tmc-r/blob/cb4ae20402f066b36e80c67b920ab8db2a87c70a/R/TMC_plugin.R#L84) *style:* **Lines should not be more than 80 characters.**
```r
    # render*-function renders UI content and corresponds to *Output-function in UI
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/TMC_plugin.R:87:12:](https://github.com/RTMC/tmc-r/blob/cb4ae20402f066b36e80c67b920ab8db2a87c70a/R/TMC_plugin.R#L87) *style:* **Variable or function name should be snake_case.**
```r
    output$courseDisplay <- renderText({
           ^~~~~~~~~~~~~
```
[R/TMC_plugin.R:91:3:](https://github.com/RTMC/tmc-r/blob/cb4ae20402f066b36e80c67b920ab8db2a87c70a/R/TMC_plugin.R#L91) *warning:* **no visible global function definition for ‘runGadget’**
```r
  runGadget(ui, server, viewer = dialogViewer("TMC login"))
  ^~~~~~~~~
```
[R/TMC_plugin.R:91:34:](https://github.com/RTMC/tmc-r/blob/cb4ae20402f066b36e80c67b920ab8db2a87c70a/R/TMC_plugin.R#L91) *warning:* **no visible global function definition for ‘dialogViewer’**
```r
  runGadget(ui, server, viewer = dialogViewer("TMC login"))
                                 ^~~~~~~~~~~~
```
[tests/testthat/testAuthentication.R:7:1:](https://github.com/RTMC/tmc-r/blob/cb4ae20402f066b36e80c67b920ab8db2a87c70a/tests/testthat/testAuthentication.R#L7) *style:* **Lines should not be more than 80 characters.**
```r
  expect_is(authenticate("sddsdaddsdsdadasads", "dsdasasdsdsdasdasdasd"), "list")
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```


_는 되도록 피하는게 좋지 않을까요?
```swift
static func message(for error: Error, response: HTTPURLResponse, data: Data?)
```


You can build with MinGW (http://tdm-gcc.tdragon.net/) and Clang (https://llvm.org/builds/) on Windows, that will give you pretty good coverage.


Carpenters Block slab isn't done as of yet, code I forked for the 1.10.2 preview wasn't fully there so most of the blocks & models have to be re-coded and there's a few bugs.. Took a day break because of sickness & so I wouldn't burn out of motivation.. As of now I am currently trying to finish the behavior of the garage door where it interacts w/ nearby ones. If you have any questions it's better to contact me via Discord, either add me bdogs15#2004 or join my Discord server(Link found on my github page)


We got a notice from the mailbox about the dateline errors in these documents. I only noticed the OCR errors in the source notes when I was fixing the datelines. I might take another full pass at these 9 documents a bit later to doublecheck the body text.


[R/getAvailablePoints.R:3:20:](https://github.com/RTMC/tmc-r/blob/cb4ae20402f066b36e80c67b920ab8db2a87c70a/R/getAvailablePoints.R#L3) *style:* **Commas should always have a space after.**
```r
test <- function(a,point,c){
                   ^
```
[R/getAvailablePoints.R:3:26:](https://github.com/RTMC/tmc-r/blob/cb4ae20402f066b36e80c67b920ab8db2a87c70a/R/getAvailablePoints.R#L3) *style:* **Commas should always have a space after.**
```r
test <- function(a,point,c){
                         ^
```
[R/getAvailablePoints.R:4:5:](https://github.com/RTMC/tmc-r/blob/cb4ae20402f066b36e80c67b920ab8db2a87c70a/R/getAvailablePoints.R#L4) *style:* **Place a space before left parenthesis, except in a function call.**
```r
  if(!is.null(point)){
    ^
```
[R/getAvailablePoints.R:5:5:](https://github.com/RTMC/tmc-r/blob/cb4ae20402f066b36e80c67b920ab8db2a87c70a/R/getAvailablePoints.R#L5) *warning:* **no visible binding for '<<-' assignment to ‘all_available_points’**
```r
    all_available_points<<-c(all_available_points,point)
    ^~~~~~~~~~~~~~~~~~~~
```
[R/getAvailablePoints.R:5:5:](https://github.com/RTMC/tmc-r/blob/cb4ae20402f066b36e80c67b920ab8db2a87c70a/R/getAvailablePoints.R#L5) *warning:* **no visible binding for global variable ‘all_available_points’**
```r
    all_available_points<<-c(all_available_points,point)
    ^~~~~~~~~~~~~~~~~~~~
```
[R/getAvailablePoints.R:5:25:](https://github.com/RTMC/tmc-r/blob/cb4ae20402f066b36e80c67b920ab8db2a87c70a/R/getAvailablePoints.R#L5) *style:* **Put spaces around all infix operators.**
```r
    all_available_points<<-c(all_available_points,point)
                       ~^~~~
```
[R/getAvailablePoints.R:5:51:](https://github.com/RTMC/tmc-r/blob/cb4ae20402f066b36e80c67b920ab8db2a87c70a/R/getAvailablePoints.R#L5) *style:* **Commas should always have a space after.**
```r
    all_available_points<<-c(all_available_points,point)
                                                  ^
```
[R/getAvailablePoints.R:9:1:](https://github.com/RTMC/tmc-r/blob/cb4ae20402f066b36e80c67b920ab8db2a87c70a/R/getAvailablePoints.R#L9) *style:* **Variable or function name should be snake_case.**
```r
pointsForAllTests<-function(point){
^~~~~~~~~~~~~~~~~
```
[R/getAvailablePoints.R:9:18:](https://github.com/RTMC/tmc-r/blob/cb4ae20402f066b36e80c67b920ab8db2a87c70a/R/getAvailablePoints.R#L9) *style:* **Put spaces around all infix operators.**
```r
pointsForAllTests<-function(point){
                ~^~~
```
[R/getAvailablePoints.R:10:3:](https://github.com/RTMC/tmc-r/blob/cb4ae20402f066b36e80c67b920ab8db2a87c70a/R/getAvailablePoints.R#L10) *warning:* **no visible binding for '<<-' assignment to ‘all_available_points’**
```r
  all_available_points<<-c(all_available_points,point)
  ^~~~~~~~~~~~~~~~~~~~
```
[R/getAvailablePoints.R:10:3:](https://github.com/RTMC/tmc-r/blob/cb4ae20402f066b36e80c67b920ab8db2a87c70a/R/getAvailablePoints.R#L10) *warning:* **no visible binding for global variable ‘all_available_points’**
```r
  all_available_points<<-c(all_available_points,point)
  ^~~~~~~~~~~~~~~~~~~~
```
[R/getAvailablePoints.R:10:23:](https://github.com/RTMC/tmc-r/blob/cb4ae20402f066b36e80c67b920ab8db2a87c70a/R/getAvailablePoints.R#L10) *style:* **Put spaces around all infix operators.**
```r
  all_available_points<<-c(all_available_points,point)
                     ~^~~~
```
[R/getAvailablePoints.R:10:49:](https://github.com/RTMC/tmc-r/blob/cb4ae20402f066b36e80c67b920ab8db2a87c70a/R/getAvailablePoints.R#L10) *style:* **Commas should always have a space after.**
```r
  all_available_points<<-c(all_available_points,point)
                                                ^
```
[R/getAvailablePoints.R:13:1:](https://github.com/RTMC/tmc-r/blob/cb4ae20402f066b36e80c67b920ab8db2a87c70a/R/getAvailablePoints.R#L13) *style:* **Variable or function name should be snake_case.**
```r
getAvailablePoints <-function(project_path){
^~~~~~~~~~~~~~~~~~
```
[R/getAvailablePoints.R:13:20:](https://github.com/RTMC/tmc-r/blob/cb4ae20402f066b36e80c67b920ab8db2a87c70a/R/getAvailablePoints.R#L13) *style:* **Put spaces around all infix operators.**
```r
getAvailablePoints <-function(project_path){
                   ^~~
```
[R/getAvailablePoints.R:15:3:](https://github.com/RTMC/tmc-r/blob/cb4ae20402f066b36e80c67b920ab8db2a87c70a/R/getAvailablePoints.R#L15) *warning:* **no visible binding for '<<-' assignment to ‘all_available_points’**
```r
  all_available_points <<- c()
  ^~~~~~~~~~~~~~~~~~~~
```
[R/getAvailablePoints.R:16:1:](https://github.com/RTMC/tmc-r/blob/cb4ae20402f066b36e80c67b920ab8db2a87c70a/R/getAvailablePoints.R#L16) *style:* **Lines should not be more than 100 characters.**
```r
  testFiles <- list.files(path="tests/testthat", pattern = "test.*\\.R", full.names = T, recursive = FALSE)
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/getAvailablePoints.R:16:3:](https://github.com/RTMC/tmc-r/blob/cb4ae20402f066b36e80c67b920ab8db2a87c70a/R/getAvailablePoints.R#L16) *style:* **Variable or function name should be snake_case.**
```r
  testFiles <- list.files(path="tests/testthat", pattern = "test.*\\.R", full.names = T, recursive = FALSE)
  ^~~~~~~~~
```
[R/getAvailablePoints.R:16:31:](https://github.com/RTMC/tmc-r/blob/cb4ae20402f066b36e80c67b920ab8db2a87c70a/R/getAvailablePoints.R#L16) *style:* **Put spaces around all infix operators.**
```r
  testFiles <- list.files(path="tests/testthat", pattern = "test.*\\.R", full.names = T, recursive = FALSE)
                             ~^~
```
[R/getAvailablePoints.R:18:5:](https://github.com/RTMC/tmc-r/blob/cb4ae20402f066b36e80c67b920ab8db2a87c70a/R/getAvailablePoints.R#L18) *warning:* **no visible global function definition for ‘test_file’, Did you mean 'testFile'?**
```r
    test_file(testFile, reporter = "silent",load_helpers=FALSE)
    ^~~~~~~~~
```
[R/getAvailablePoints.R:18:45:](https://github.com/RTMC/tmc-r/blob/cb4ae20402f066b36e80c67b920ab8db2a87c70a/R/getAvailablePoints.R#L18) *style:* **Commas should always have a space after.**
```r
    test_file(testFile, reporter = "silent",load_helpers=FALSE)
                                            ^
```
[R/getAvailablePoints.R:18:57:](https://github.com/RTMC/tmc-r/blob/cb4ae20402f066b36e80c67b920ab8db2a87c70a/R/getAvailablePoints.R#L18) *style:* **Put spaces around all infix operators.**
```r
    test_file(testFile, reporter = "silent",load_helpers=FALSE)
                                                       ~^~
```
[R/getAvailablePoints.R:20:10:](https://github.com/RTMC/tmc-r/blob/cb4ae20402f066b36e80c67b920ab8db2a87c70a/R/getAvailablePoints.R#L20) *warning:* **no visible binding for global variable ‘all_available_points’**
```r
  return(all_available_points)
         ^~~~~~~~~~~~~~~~~~~~
```
[R/ResultsJsonParser.R:2:1:](https://github.com/RTMC/tmc-r/blob/cb4ae20402f066b36e80c67b920ab8db2a87c70a/R/ResultsJsonParser.R#L2) *style:* **Variable or function name should be snake_case.**
```r
.CreateJsonResults <- function(testthatOutput) {
^~~~~~~~~~~~~~~~~~
```
[R/ResultsJsonParser.R:2:32:](https://github.com/RTMC/tmc-r/blob/cb4ae20402f066b36e80c67b920ab8db2a87c70a/R/ResultsJsonParser.R#L2) *style:* **Variable or function name should be snake_case.**
```r
.CreateJsonResults <- function(testthatOutput) {
                               ^~~~~~~~~~~~~~
```
[R/ResultsJsonParser.R:3:11:](https://github.com/RTMC/tmc-r/blob/cb4ae20402f066b36e80c67b920ab8db2a87c70a/R/ResultsJsonParser.R#L3) *style:* **Use <-, not =, for assignment.**
```r
  results = list()
          ^
```
[R/ResultsJsonParser.R:5:5:](https://github.com/RTMC/tmc-r/blob/cb4ae20402f066b36e80c67b920ab8db2a87c70a/R/ResultsJsonParser.R#L5) *style:* **Variable or function name should be snake_case.**
```r
    testName <- test$test
    ^~~~~~~~
```
[R/ResultsJsonParser.R:6:5:](https://github.com/RTMC/tmc-r/blob/cb4ae20402f066b36e80c67b920ab8db2a87c70a/R/ResultsJsonParser.R#L6) *style:* **Variable or function name should be snake_case.**
```r
    testPoints <- test$points
    ^~~~~~~~~~
```
[R/ResultsJsonParser.R:7:5:](https://github.com/RTMC/tmc-r/blob/cb4ae20402f066b36e80c67b920ab8db2a87c70a/R/ResultsJsonParser.R#L7) *style:* **Variable or function name should be snake_case.**
```r
    testMessage <- ""
    ^~~~~~~~~~~
```
[R/ResultsJsonParser.R:10:7:](https://github.com/RTMC/tmc-r/blob/cb4ae20402f066b36e80c67b920ab8db2a87c70a/R/ResultsJsonParser.R#L10) *style:* **Variable or function name should be snake_case.**
```r
      testStatus <- "pass"
      ^~~~~~~~~~
```
[R/ResultsJsonParser.R:12:7:](https://github.com/RTMC/tmc-r/blob/cb4ae20402f066b36e80c67b920ab8db2a87c70a/R/ResultsJsonParser.R#L12) *style:* **Variable or function name should be snake_case.**
```r
      testStatus <- "fail"
      ^~~~~~~~~~
```
[R/ResultsJsonParser.R:13:7:](https://github.com/RTMC/tmc-r/blob/cb4ae20402f066b36e80c67b920ab8db2a87c70a/R/ResultsJsonParser.R#L13) *style:* **Variable or function name should be snake_case.**
```r
      testMessage <- .CreateMessageForTestWithFailures(test)
      ^~~~~~~~~~~
```
[R/ResultsJsonParser.R:13:22:](https://github.com/RTMC/tmc-r/blob/cb4ae20402f066b36e80c67b920ab8db2a87c70a/R/ResultsJsonParser.R#L13) *warning:* **no visible global function definition for ‘.CreateMessageForTestWithFailures’**
```r
      testMessage <- .CreateMessageForTestWithFailures(test)
                     ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/ResultsJsonParser.R:16:5:](https://github.com/RTMC/tmc-r/blob/cb4ae20402f066b36e80c67b920ab8db2a87c70a/R/ResultsJsonParser.R#L16) *style:* **Variable or function name should be snake_case.**
```r
    testResult <- .CreateJsonTestResult(testStatus, testName, testMessage,testPoints, "")
    ^~~~~~~~~~
```
[R/ResultsJsonParser.R:16:19:](https://github.com/RTMC/tmc-r/blob/cb4ae20402f066b36e80c67b920ab8db2a87c70a/R/ResultsJsonParser.R#L16) *warning:* **no visible global function definition for ‘.CreateJsonTestResult’**
```r
    testResult <- .CreateJsonTestResult(testStatus, testName, testMessage,testPoints, "")
                  ^~~~~~~~~~~~~~~~~~~~~
```
[R/ResultsJsonParser.R:16:75:](https://github.com/RTMC/tmc-r/blob/cb4ae20402f066b36e80c67b920ab8db2a87c70a/R/ResultsJsonParser.R#L16) *style:* **Commas should always have a space after.**
```r
    testResult <- .CreateJsonTestResult(testStatus, testName, testMessage,testPoints, "")
                                                                          ^
```
[R/ResultsJsonParser.R:18:29:](https://github.com/RTMC/tmc-r/blob/cb4ae20402f066b36e80c67b920ab8db2a87c70a/R/ResultsJsonParser.R#L18) *style:* **Put spaces around all infix operators.**
```r
    results[[length(results)+1]] <- testResult
                           ~^~
```
[R/ResultsJsonParser.R:20:10:](https://github.com/RTMC/tmc-r/blob/cb4ae20402f066b36e80c67b920ab8db2a87c70a/R/ResultsJsonParser.R#L20) *style:* **Remove spaces before the left parenthesis in a function call.**
```r
  return (results)
         ^
```
[R/ResultsJsonParser.R:24:1:](https://github.com/RTMC/tmc-r/blob/cb4ae20402f066b36e80c67b920ab8db2a87c70a/R/ResultsJsonParser.R#L24) *style:* **Variable or function name should be snake_case.**
```r
.CreateJsonTestResult <- function(testStatus, testName, testMessage,
^~~~~~~~~~~~~~~~~~~~~
```
[R/ResultsJsonParser.R:24:35:](https://github.com/RTMC/tmc-r/blob/cb4ae20402f066b36e80c67b920ab8db2a87c70a/R/ResultsJsonParser.R#L24) *style:* **Variable or function name should be snake_case.**
```r
.CreateJsonTestResult <- function(testStatus, testName, testMessage,
                                  ^~~~~~~~~~
```
[R/ResultsJsonParser.R:24:47:](https://github.com/RTMC/tmc-r/blob/cb4ae20402f066b36e80c67b920ab8db2a87c70a/R/ResultsJsonParser.R#L24) *style:* **Variable or function name should be snake_case.**
```r
.CreateJsonTestResult <- function(testStatus, testName, testMessage,
                                              ^~~~~~~~
```
[R/ResultsJsonParser.R:24:57:](https://github.com/RTMC/tmc-r/blob/cb4ae20402f066b36e80c67b920ab8db2a87c70a/R/ResultsJsonParser.R#L24) *style:* **Variable or function name should be snake_case.**
```r
.CreateJsonTestResult <- function(testStatus, testName, testMessage,
                                                        ^~~~~~~~~~~
```
[R/ResultsJsonParser.R:25:35:](https://github.com/RTMC/tmc-r/blob/cb4ae20402f066b36e80c67b920ab8db2a87c70a/R/ResultsJsonParser.R#L25) *style:* **Variable or function name should be snake_case.**
```r
                                  testPoints, backtrace) {
                                  ^~~~~~~~~~
```
[R/ResultsJsonParser.R:26:3:](https://github.com/RTMC/tmc-r/blob/cb4ae20402f066b36e80c67b920ab8db2a87c70a/R/ResultsJsonParser.R#L26) *style:* **Variable or function name should be snake_case.**
```r
  testResult <- list(status=unbox(testStatus),
  ^~~~~~~~~~
```
[R/ResultsJsonParser.R:26:28:](https://github.com/RTMC/tmc-r/blob/cb4ae20402f066b36e80c67b920ab8db2a87c70a/R/ResultsJsonParser.R#L26) *style:* **Put spaces around all infix operators.**
```r
  testResult <- list(status=unbox(testStatus),
                          ~^~
```
[R/ResultsJsonParser.R:27:26:](https://github.com/RTMC/tmc-r/blob/cb4ae20402f066b36e80c67b920ab8db2a87c70a/R/ResultsJsonParser.R#L27) *style:* **Put spaces around all infix operators.**
```r
                     name=unbox(format(testName)),
                        ~^~
```
[R/ResultsJsonParser.R:28:29:](https://github.com/RTMC/tmc-r/blob/cb4ae20402f066b36e80c67b920ab8db2a87c70a/R/ResultsJsonParser.R#L28) *style:* **Put spaces around all infix operators.**
```r
                     message=unbox(testMessage),
                           ~^~
```
[R/ResultsJsonParser.R:29:31:](https://github.com/RTMC/tmc-r/blob/cb4ae20402f066b36e80c67b920ab8db2a87c70a/R/ResultsJsonParser.R#L29) *style:* **Put spaces around all infix operators.**
```r
                     backtrace=unbox(backtrace),
                             ~^~
```
[R/ResultsJsonParser.R:30:28:](https://github.com/RTMC/tmc-r/blob/cb4ae20402f066b36e80c67b920ab8db2a87c70a/R/ResultsJsonParser.R#L30) *style:* **Put spaces around all infix operators.**
```r
                     points=testPoints)
                          ~^~
```
[R/ResultsJsonParser.R:36:1:](https://github.com/RTMC/tmc-r/blob/cb4ae20402f066b36e80c67b920ab8db2a87c70a/R/ResultsJsonParser.R#L36) *style:* **Variable or function name should be snake_case.**
```r
.MessageFromFailedResult <- function(result) {
^~~~~~~~~~~~~~~~~~~~~~~~
```
[R/ResultsJsonParser.R:42:10:](https://github.com/RTMC/tmc-r/blob/cb4ae20402f066b36e80c67b920ab8db2a87c70a/R/ResultsJsonParser.R#L42) *style:* **Remove spaces before the left parenthesis in a function call.**
```r
  return (paste(sep="", "Failed with call: ", language,"\n", result$message))
         ^
```
[R/ResultsJsonParser.R:42:20:](https://github.com/RTMC/tmc-r/blob/cb4ae20402f066b36e80c67b920ab8db2a87c70a/R/ResultsJsonParser.R#L42) *style:* **Put spaces around all infix operators.**
```r
  return (paste(sep="", "Failed with call: ", language,"\n", result$message))
                  ~^~
```
[R/ResultsJsonParser.R:42:56:](https://github.com/RTMC/tmc-r/blob/cb4ae20402f066b36e80c67b920ab8db2a87c70a/R/ResultsJsonParser.R#L42) *style:* **Commas should always have a space after.**
```r
  return (paste(sep="", "Failed with call: ", language,"\n", result$message))
                                                       ^
```
[R/ResultsJsonParser.R:45:1:](https://github.com/RTMC/tmc-r/blob/cb4ae20402f066b36e80c67b920ab8db2a87c70a/R/ResultsJsonParser.R#L45) *style:* **Variable and function names should not be longer than 30 characters.**
```r
.CreateMessageForTestWithFailures <- function(test) {
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/ResultsJsonParser.R:45:1:](https://github.com/RTMC/tmc-r/blob/cb4ae20402f066b36e80c67b920ab8db2a87c70a/R/ResultsJsonParser.R#L45) *style:* **Variable or function name should be snake_case.**
```r
.CreateMessageForTestWithFailures <- function(test) {
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/ResultsJsonParser.R:46:3:](https://github.com/RTMC/tmc-r/blob/cb4ae20402f066b36e80c67b920ab8db2a87c70a/R/ResultsJsonParser.R#L46) *style:* **Variable or function name should be snake_case.**
```r
  testMessage <- ""
  ^~~~~~~~~~~
```
[R/ResultsJsonParser.R:49:7:](https://github.com/RTMC/tmc-r/blob/cb4ae20402f066b36e80c67b920ab8db2a87c70a/R/ResultsJsonParser.R#L49) *style:* **Variable or function name should be snake_case.**
```r
      testMessage <- paste(sep = "", testMessage, .MessageFromFailedResult(result))
      ^~~~~~~~~~~
```
[R/ResultsJsonParser.R:49:51:](https://github.com/RTMC/tmc-r/blob/cb4ae20402f066b36e80c67b920ab8db2a87c70a/R/ResultsJsonParser.R#L49) *warning:* **no visible global function definition for ‘.MessageFromFailedResult’**
```r
      testMessage <- paste(sep = "", testMessage, .MessageFromFailedResult(result))
                                                  ^~~~~~~~~~~~~~~~~~~~~~~~
```
[R/ResultsJsonParser.R:56:1:](https://github.com/RTMC/tmc-r/blob/cb4ae20402f066b36e80c67b920ab8db2a87c70a/R/ResultsJsonParser.R#L56) *style:* **Variable or function name should be snake_case.**
```r
.WriteJson <- function(results) {
^~~~~~~~~~
```
[R/ResultsJsonParser.R:58:20:](https://github.com/RTMC/tmc-r/blob/cb4ae20402f066b36e80c67b920ab8db2a87c70a/R/ResultsJsonParser.R#L58) *warning:* **no visible global function definition for ‘toJSON’**
```r
  json <- enc2utf8(toJSON(results, pretty = FALSE))
                   ^~~~~~
```
[R/ResultsJsonParser.R:59:11:](https://github.com/RTMC/tmc-r/blob/cb4ae20402f066b36e80c67b920ab8db2a87c70a/R/ResultsJsonParser.R#L59) *warning:* **no visible global function definition for ‘prettify’, Did you mean 'pretty'?**
```r
  json <- prettify(json)
          ^~~~~~~~
```
[R/ResultsJsonParser.R:65:1:](https://github.com/RTMC/tmc-r/blob/cb4ae20402f066b36e80c67b920ab8db2a87c70a/R/ResultsJsonParser.R#L65) *style:* **Variable or function name should be snake_case.**
```r
.PrintResultsFromJson <- function(jsonResult) {
^~~~~~~~~~~~~~~~~~~~~
```
[R/ResultsJsonParser.R:65:35:](https://github.com/RTMC/tmc-r/blob/cb4ae20402f066b36e80c67b920ab8db2a87c70a/R/ResultsJsonParser.R#L65) *style:* **Variable or function name should be snake_case.**
```r
.PrintResultsFromJson <- function(jsonResult) {
                                  ^~~~~~~~~~
```
[R/RunTests.R:8:1:](https://github.com/RTMC/tmc-r/blob/cb4ae20402f066b36e80c67b920ab8db2a87c70a/R/RunTests.R#L8) *style:* **Variable or function name should be snake_case.**
```r
runTests <- function(projectPath, print=FALSE) {
^~~~~~~~
```
[R/RunTests.R:8:22:](https://github.com/RTMC/tmc-r/blob/cb4ae20402f066b36e80c67b920ab8db2a87c70a/R/RunTests.R#L8) *style:* **Variable or function name should be snake_case.**
```r
runTests <- function(projectPath, print=FALSE) {
                     ^~~~~~~~~~~
```
[R/RunTests.R:9:3:](https://github.com/RTMC/tmc-r/blob/cb4ae20402f066b36e80c67b920ab8db2a87c70a/R/RunTests.R#L9) *style:* **Variable or function name should be snake_case.**
```r
  tmcrTestRunnerProjectPath <- getwd()
  ^~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/RunTests.R:12:3:](https://github.com/RTMC/tmc-r/blob/cb4ae20402f066b36e80c67b920ab8db2a87c70a/R/RunTests.R#L12) *style:* **Variable or function name should be snake_case.**
```r
  testthatOutput <- .RunTestsProject(projectPath)
  ^~~~~~~~~~~~~~
```
[R/RunTests.R:12:21:](https://github.com/RTMC/tmc-r/blob/cb4ae20402f066b36e80c67b920ab8db2a87c70a/R/RunTests.R#L12) *warning:* **no visible global function definition for ‘.RunTestsProject’**
```r
  testthatOutput <- .RunTestsProject(projectPath)
                    ^~~~~~~~~~~~~~~~
```
[R/RunTests.R:14:3:](https://github.com/RTMC/tmc-r/blob/cb4ae20402f066b36e80c67b920ab8db2a87c70a/R/RunTests.R#L14) *style:* **Variable or function name should be snake_case.**
```r
  jsonResults <- .CreateJsonResults(testthatOutput)
  ^~~~~~~~~~~
```
[R/RunTests.R:14:18:](https://github.com/RTMC/tmc-r/blob/cb4ae20402f066b36e80c67b920ab8db2a87c70a/R/RunTests.R#L14) *warning:* **no visible global function definition for ‘.CreateJsonResults’**
```r
  jsonResults <- .CreateJsonResults(testthatOutput)
                 ^~~~~~~~~~~~~~~~~~
```
[R/RunTests.R:15:3:](https://github.com/RTMC/tmc-r/blob/cb4ae20402f066b36e80c67b920ab8db2a87c70a/R/RunTests.R#L15) *warning:* **no visible global function definition for ‘.WriteJson’**
```r
  .WriteJson(jsonResults)
  ^~~~~~~~~~
```
[R/RunTests.R:18:5:](https://github.com/RTMC/tmc-r/blob/cb4ae20402f066b36e80c67b920ab8db2a87c70a/R/RunTests.R#L18) *warning:* **no visible global function definition for ‘.PrintResultsFromJson’**
```r
    .PrintResultsFromJson(jsonResults)
    ^~~~~~~~~~~~~~~~~~~~~
```
[R/RunTests.R:24:1:](https://github.com/RTMC/tmc-r/blob/cb4ae20402f066b36e80c67b920ab8db2a87c70a/R/RunTests.R#L24) *style:* **Variable or function name should be snake_case.**
```r
.RunTestsProject <- function(projectPath) {
^~~~~~~~~~~~~~~~
```
[R/RunTests.R:24:30:](https://github.com/RTMC/tmc-r/blob/cb4ae20402f066b36e80c67b920ab8db2a87c70a/R/RunTests.R#L24) *style:* **Variable or function name should be snake_case.**
```r
.RunTestsProject <- function(projectPath) {
                             ^~~~~~~~~~~
```
[R/RunTests.R:27:3:](https://github.com/RTMC/tmc-r/blob/cb4ae20402f066b36e80c67b920ab8db2a87c70a/R/RunTests.R#L27) *style:* **Variable or function name should be snake_case.**
```r
  testthatOutput <- list()
  ^~~~~~~~~~~~~~
```
[R/RunTests.R:30:1:](https://github.com/RTMC/tmc-r/blob/cb4ae20402f066b36e80c67b920ab8db2a87c70a/R/RunTests.R#L30) *style:* **Lines should not be more than 100 characters.**
```r
  testFiles <- list.files(path="tests/testthat", pattern = "test.*\\.R", full.names = T, recursive = FALSE)
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/RunTests.R:30:3:](https://github.com/RTMC/tmc-r/blob/cb4ae20402f066b36e80c67b920ab8db2a87c70a/R/RunTests.R#L30) *style:* **Variable or function name should be snake_case.**
```r
  testFiles <- list.files(path="tests/testthat", pattern = "test.*\\.R", full.names = T, recursive = FALSE)
  ^~~~~~~~~
```
[R/RunTests.R:30:31:](https://github.com/RTMC/tmc-r/blob/cb4ae20402f066b36e80c67b920ab8db2a87c70a/R/RunTests.R#L30) *style:* **Put spaces around all infix operators.**
```r
  testFiles <- list.files(path="tests/testthat", pattern = "test.*\\.R", full.names = T, recursive = FALSE)
                             ~^~
```
[R/RunTests.R:33:5:](https://github.com/RTMC/tmc-r/blob/cb4ae20402f066b36e80c67b920ab8db2a87c70a/R/RunTests.R#L33) *style:* **Variable or function name should be snake_case.**
```r
    testFileOutput <- .RunTestsFile(testFile)
    ^~~~~~~~~~~~~~
```
[R/RunTests.R:33:23:](https://github.com/RTMC/tmc-r/blob/cb4ae20402f066b36e80c67b920ab8db2a87c70a/R/RunTests.R#L33) *warning:* **no visible global function definition for ‘.RunTestsFile’**
```r
    testFileOutput <- .RunTestsFile(testFile)
                      ^~~~~~~~~~~~~
```
[R/RunTests.R:34:5:](https://github.com/RTMC/tmc-r/blob/cb4ae20402f066b36e80c67b920ab8db2a87c70a/R/RunTests.R#L34) *style:* **Variable or function name should be snake_case.**
```r
    testthatOutput <- c(testthatOutput, testFileOutput)
    ^~~~~~~~~~~~~~
```
[R/RunTests.R:39:1:](https://github.com/RTMC/tmc-r/blob/cb4ae20402f066b36e80c67b920ab8db2a87c70a/R/RunTests.R#L39) *style:* **Variable or function name should be snake_case.**
```r
.RunTestsFile <- function(filePath) {
^~~~~~~~~~~~~
```
[R/RunTests.R:39:27:](https://github.com/RTMC/tmc-r/blob/cb4ae20402f066b36e80c67b920ab8db2a87c70a/R/RunTests.R#L39) *style:* **Variable or function name should be snake_case.**
```r
.RunTestsFile <- function(filePath) {
                          ^~~~~~~~
```
[R/RunTests.R:43:3:](https://github.com/RTMC/tmc-r/blob/cb4ae20402f066b36e80c67b920ab8db2a87c70a/R/RunTests.R#L43) *style:* **Variable or function name should be snake_case.**
```r
  testFileOutput <- test_file(filePath, reporter = "silent")
  ^~~~~~~~~~~~~~
```
[R/RunTests.R:43:21:](https://github.com/RTMC/tmc-r/blob/cb4ae20402f066b36e80c67b920ab8db2a87c70a/R/RunTests.R#L43) *warning:* **no visible global function definition for ‘test_file’**
```r
  testFileOutput <- test_file(filePath, reporter = "silent")
                    ^~~~~~~~~
```
[R/RunTests.R:44:3:](https://github.com/RTMC/tmc-r/blob/cb4ae20402f066b36e80c67b920ab8db2a87c70a/R/RunTests.R#L44) *style:* **Variable or function name should be snake_case.**
```r
  testFileOutput <- .AddPointsToTestOutput(testFileOutput)
  ^~~~~~~~~~~~~~
```
[R/RunTests.R:44:21:](https://github.com/RTMC/tmc-r/blob/cb4ae20402f066b36e80c67b920ab8db2a87c70a/R/RunTests.R#L44) *warning:* **no visible global function definition for ‘.AddPointsToTestOutput’**
```r
  testFileOutput <- .AddPointsToTestOutput(testFileOutput)
                    ^~~~~~~~~~~~~~~~~~~~~~
```
[R/RunTests.R:49:1:](https://github.com/RTMC/tmc-r/blob/cb4ae20402f066b36e80c67b920ab8db2a87c70a/R/RunTests.R#L49) *style:* **Variable or function name should be snake_case.**
```r
.AddPointsToTestOutput <- function(testOutput) {
^~~~~~~~~~~~~~~~~~~~~~
```
[R/RunTests.R:49:36:](https://github.com/RTMC/tmc-r/blob/cb4ae20402f066b36e80c67b920ab8db2a87c70a/R/RunTests.R#L49) *style:* **Variable or function name should be snake_case.**
```r
.AddPointsToTestOutput <- function(testOutput) {
                                   ^~~~~~~~~~
```
[R/RunTests.R:51:31:](https://github.com/RTMC/tmc-r/blob/cb4ae20402f066b36e80c67b920ab8db2a87c70a/R/RunTests.R#L51) *warning:* **no visible global function definition for ‘.GetTestPoints’**
```r
    testOutput[[i]]$points <- .GetTestPoints(testOutput[[i]]$test)
                              ^~~~~~~~~~~~~~
```
[R/RunTests.R:56:1:](https://github.com/RTMC/tmc-r/blob/cb4ae20402f066b36e80c67b920ab8db2a87c70a/R/RunTests.R#L56) *style:* **Variable or function name should be snake_case.**
```r
.GetTestPoints <- function(testName) {
^~~~~~~~~~~~~~
```
[R/RunTests.R:56:28:](https://github.com/RTMC/tmc-r/blob/cb4ae20402f066b36e80c67b920ab8db2a87c70a/R/RunTests.R#L56) *style:* **Variable or function name should be snake_case.**
```r
.GetTestPoints <- function(testName) {
                           ^~~~~~~~
```
[R/RunTests.R:58:5:](https://github.com/RTMC/tmc-r/blob/cb4ae20402f066b36e80c67b920ab8db2a87c70a/R/RunTests.R#L58) *style:* **Variable or function name should be snake_case.**
```r
    testPoints <- vector()
    ^~~~~~~~~~
```
[R/RunTests.R:60:5:](https://github.com/RTMC/tmc-r/blob/cb4ae20402f066b36e80c67b920ab8db2a87c70a/R/RunTests.R#L60) *style:* **Variable or function name should be snake_case.**
```r
    testPoints <- points[[testName]]
    ^~~~~~~~~~
```
[R/RunTests.R:62:3:](https://github.com/RTMC/tmc-r/blob/cb4ae20402f066b36e80c67b920ab8db2a87c70a/R/RunTests.R#L62) *style:* **Variable or function name should be snake_case.**
```r
  testPoints <- c(.GlobalEnv$points_for_all_tests, testPoints)
  ^~~~~~~~~~
```
[R/TestthatResultReader.R:2:1:](https://github.com/RTMC/tmc-r/blob/cb4ae20402f066b36e80c67b920ab8db2a87c70a/R/TestthatResultReader.R#L2) *style:* **Variable or function name should be snake_case.**
```r
.CheckAllTestPassed <- function(testOutput) {
^~~~~~~~~~~~~~~~~~~
```
[R/TestthatResultReader.R:2:33:](https://github.com/RTMC/tmc-r/blob/cb4ae20402f066b36e80c67b920ab8db2a87c70a/R/TestthatResultReader.R#L2) *style:* **Variable or function name should be snake_case.**
```r
.CheckAllTestPassed <- function(testOutput) {
                                ^~~~~~~~~~
```
[R/TestthatResultReader.R:10:10:](https://github.com/RTMC/tmc-r/blob/cb4ae20402f066b36e80c67b920ab8db2a87c70a/R/TestthatResultReader.R#L10) *style:* **Remove spaces before the left parenthesis in a function call.**
```r
  return (ret)
         ^
```
[R/TestthatResultReader.R:14:1:](https://github.com/RTMC/tmc-r/blob/cb4ae20402f066b36e80c67b920ab8db2a87c70a/R/TestthatResultReader.R#L14) *style:* **Variable or function name should be snake_case.**
```r
.CheckIfTestPassed <- function(test) {
^~~~~~~~~~~~~~~~~~
```
[R/TestthatResultReader.R:22:10:](https://github.com/RTMC/tmc-r/blob/cb4ae20402f066b36e80c67b920ab8db2a87c70a/R/TestthatResultReader.R#L22) *style:* **Remove spaces before the left parenthesis in a function call.**
```r
  return (ret)
         ^
```
[R/TestthatResultReader.R:26:1:](https://github.com/RTMC/tmc-r/blob/cb4ae20402f066b36e80c67b920ab8db2a87c70a/R/TestthatResultReader.R#L26) *style:* **Variable or function name should be snake_case.**
```r
.CheckIfResultPassed <- function(result) {
^~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/resources/simple_all_tests_pass/R/main.R:1:1:](https://github.com/RTMC/tmc-r/blob/cb4ae20402f066b36e80c67b920ab8db2a87c70a/tests/testthat/resources/simple_all_tests_pass/R/main.R#L1) *style:* **Variable or function name should be snake_case.**
```r
RetTrue <- function() {
^~~~~~~
```
[tests/testthat/resources/simple_all_tests_pass/R/main.R:5:1:](https://github.com/RTMC/tmc-r/blob/cb4ae20402f066b36e80c67b920ab8db2a87c70a/tests/testthat/resources/simple_all_tests_pass/R/main.R#L5) *style:* **Variable or function name should be snake_case.**
```r
RetOne <- function() {
^~~~~~
```
[tests/testthat/resources/simple_all_tests_pass/R/main.R:9:1:](https://github.com/RTMC/tmc-r/blob/cb4ae20402f066b36e80c67b920ab8db2a87c70a/tests/testthat/resources/simple_all_tests_pass/R/main.R#L9) *style:* **Variable or function name should be snake_case.**
```r
Add <- function(a, b) {
^~~
```
[tests/testthat/resources/simple_all_tests_pass/tests/testthat/helperTMC.R:4:1:](https://github.com/RTMC/tmc-r/blob/cb4ae20402f066b36e80c67b920ab8db2a87c70a/tests/testthat/resources/simple_all_tests_pass/tests/testthat/helperTMC.R#L4) *style:* **Variable or function name should be snake_case.**
```r
pointsForAllTests <- function(points) {
^~~~~~~~~~~~~~~~~
```
[tests/testthat/resources/simple_all_tests_pass/tests/testthat/helperTMC.R:12:3:](https://github.com/RTMC/tmc-r/blob/cb4ae20402f066b36e80c67b920ab8db2a87c70a/tests/testthat/resources/simple_all_tests_pass/tests/testthat/helperTMC.R#L12) *warning:* **no visible global function definition for ‘test_that’**
```r
  test_that(desc, code)
  ^~~~~~~~~
```
[tests/testthat/resources/simple_all_tests_pass/tests/testthat/testMain.R:1:9:](https://github.com/RTMC/tmc-r/blob/cb4ae20402f066b36e80c67b920ab8db2a87c70a/tests/testthat/resources/simple_all_tests_pass/tests/testthat/testMain.R#L1) *style:* **Only use double-quotes.**
```r
library('testthat')
        ^~~~~~~~~~
```
[tests/testthat/resources/simple_some_tests_fail/R/main.R:1:1:](https://github.com/RTMC/tmc-r/blob/cb4ae20402f066b36e80c67b920ab8db2a87c70a/tests/testthat/resources/simple_some_tests_fail/R/main.R#L1) *style:* **Variable or function name should be snake_case.**
```r
RetTrue <- function() {
^~~~~~~
```
[tests/testthat/resources/simple_some_tests_fail/R/main.R:5:1:](https://github.com/RTMC/tmc-r/blob/cb4ae20402f066b36e80c67b920ab8db2a87c70a/tests/testthat/resources/simple_some_tests_fail/R/main.R#L5) *style:* **Variable or function name should be snake_case.**
```r
RetOne <- function() {
^~~~~~
```
[tests/testthat/resources/simple_some_tests_fail/R/main.R:9:1:](https://github.com/RTMC/tmc-r/blob/cb4ae20402f066b36e80c67b920ab8db2a87c70a/tests/testthat/resources/simple_some_tests_fail/R/main.R#L9) *style:* **Variable or function name should be snake_case.**
```r
Add <- function(a, b) {
^~~
```
[tests/testthat/resources/simple_some_tests_fail/R/main.R:13:1:](https://github.com/RTMC/tmc-r/blob/cb4ae20402f066b36e80c67b920ab8db2a87c70a/tests/testthat/resources/simple_some_tests_fail/R/main.R#L13) *style:* **Variable or function name should be snake_case.**
```r
RetFalse <- function() {
^~~~~~~~
```
[tests/testthat/resources/simple_some_tests_fail/tests/testthat/helperTMC.R:4:1:](https://github.com/RTMC/tmc-r/blob/cb4ae20402f066b36e80c67b920ab8db2a87c70a/tests/testthat/resources/simple_some_tests_fail/tests/testthat/helperTMC.R#L4) *style:* **Variable or function name should be snake_case.**
```r
pointsForAllTests <- function(points) {
^~~~~~~~~~~~~~~~~
```
[tests/testthat/resources/simple_some_tests_fail/tests/testthat/helperTMC.R:12:3:](https://github.com/RTMC/tmc-r/blob/cb4ae20402f066b36e80c67b920ab8db2a87c70a/tests/testthat/resources/simple_some_tests_fail/tests/testthat/helperTMC.R#L12) *warning:* **no visible global function definition for ‘test_that’**
```r
  test_that(desc, code)
  ^~~~~~~~~
```
[tests/testthat/resources/simple_some_tests_fail/tests/testthat/testMain.R:1:9:](https://github.com/RTMC/tmc-r/blob/cb4ae20402f066b36e80c67b920ab8db2a87c70a/tests/testthat/resources/simple_some_tests_fail/tests/testthat/testMain.R#L1) *style:* **Only use double-quotes.**
```r
library('testthat')
        ^~~~~~~~~~
```
[tests/testthat/testRunTests.R:4:1:](https://github.com/RTMC/tmc-r/blob/cb4ae20402f066b36e80c67b920ab8db2a87c70a/tests/testthat/testRunTests.R#L4) *style:* **Variable and function names should not be longer than 30 characters.**
```r
simple_all_tests_pass_project_path <- paste(sep = "", test_resources_dir, "/simple_all_tests_pass")
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/testRunTests.R:5:1:](https://github.com/RTMC/tmc-r/blob/cb4ae20402f066b36e80c67b920ab8db2a87c70a/tests/testthat/testRunTests.R#L5) *style:* **Lines should not be more than 100 characters.**
```r
simple_some_tests_fail_project_path <- paste(sep = "", test_resources_dir, "/simple_some_tests_fail")
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/testRunTests.R:5:1:](https://github.com/RTMC/tmc-r/blob/cb4ae20402f066b36e80c67b920ab8db2a87c70a/tests/testthat/testRunTests.R#L5) *style:* **Variable and function names should not be longer than 30 characters.**
```r
simple_some_tests_fail_project_path <- paste(sep = "", test_resources_dir, "/simple_some_tests_fail")
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/testRunTests.R:30:1:](https://github.com/RTMC/tmc-r/blob/cb4ae20402f066b36e80c67b920ab8db2a87c70a/tests/testthat/testRunTests.R#L30) *style:* **Lines should not be more than 100 characters.**
```r
  testFileOutput <- test_file(paste(sep="", simple_all_tests_pass_project_path, "/tests/testthat/testMain.R"), reporter="silent")
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/testRunTests.R:30:3:](https://github.com/RTMC/tmc-r/blob/cb4ae20402f066b36e80c67b920ab8db2a87c70a/tests/testthat/testRunTests.R#L30) *style:* **Variable or function name should be snake_case.**
```r
  testFileOutput <- test_file(paste(sep="", simple_all_tests_pass_project_path, "/tests/testthat/testMain.R"), reporter="silent")
  ^~~~~~~~~~~~~~
```
[tests/testthat/testRunTests.R:30:40:](https://github.com/RTMC/tmc-r/blob/cb4ae20402f066b36e80c67b920ab8db2a87c70a/tests/testthat/testRunTests.R#L30) *style:* **Put spaces around all infix operators.**
```r
  testFileOutput <- test_file(paste(sep="", simple_all_tests_pass_project_path, "/tests/testthat/testMain.R"), reporter="silent")
                                      ~^~
```
[tests/testthat/testRunTests.R:30:120:](https://github.com/RTMC/tmc-r/blob/cb4ae20402f066b36e80c67b920ab8db2a87c70a/tests/testthat/testRunTests.R#L30) *style:* **Put spaces around all infix operators.**
```r
  testFileOutput <- test_file(paste(sep="", simple_all_tests_pass_project_path, "/tests/testthat/testMain.R"), reporter="silent")
                                                                                ~^~
```
[tests/testthat/testRunTests.R:32:3:](https://github.com/RTMC/tmc-r/blob/cb4ae20402f066b36e80c67b920ab8db2a87c70a/tests/testthat/testRunTests.R#L32) *style:* **Variable or function name should be snake_case.**
```r
  testFileOutput <- .AddPointsToTestOutput(testFileOutput)
  ^~~~~~~~~~~~~~
```
[tests/testthat/testRunTests.R:38:36:](https://github.com/RTMC/tmc-r/blob/cb4ae20402f066b36e80c67b920ab8db2a87c70a/tests/testthat/testRunTests.R#L38) *style:* **Put spaces around all infix operators.**
```r
  expect_true(file.exists(paste(sep="",simple_all_tests_pass_project_path, "/.results.json")))
                                  ~^~
```
[tests/testthat/testRunTests.R:38:40:](https://github.com/RTMC/tmc-r/blob/cb4ae20402f066b36e80c67b920ab8db2a87c70a/tests/testthat/testRunTests.R#L38) *style:* **Commas should always have a space after.**
```r
  expect_true(file.exists(paste(sep="",simple_all_tests_pass_project_path, "/.results.json")))
                                       ^
```
[tests/testthat/testRunTests.R:47:7:](https://github.com/RTMC/tmc-r/blob/cb4ae20402f066b36e80c67b920ab8db2a87c70a/tests/testthat/testRunTests.R#L47) *style:* **Place a space before left parenthesis, except in a function call.**
```r
    if(!isTRUE(all.equal(string, pass_string))) {
      ^
```
[tests/testthat/testRunTests.R:56:36:](https://github.com/RTMC/tmc-r/blob/cb4ae20402f066b36e80c67b920ab8db2a87c70a/tests/testthat/testRunTests.R#L56) *style:* **Put spaces around all infix operators.**
```r
  expect_true(file.exists(paste(sep="", simple_some_tests_fail_project_path, "/.results.json")))
                                  ~^~
```
[tests/testthat/testRunTests.R:63:36:](https://github.com/RTMC/tmc-r/blob/cb4ae20402f066b36e80c67b920ab8db2a87c70a/tests/testthat/testRunTests.R#L63) *style:* **Put spaces around all infix operators.**
```r
  expect_true(file.exists(paste(sep="", simple_some_tests_fail_project_path, "/.results.json")))
                                  ~^~
```
[tests/testthat/testRunTests.R:69:5:](https://github.com/RTMC/tmc-r/blob/cb4ae20402f066b36e80c67b920ab8db2a87c70a/tests/testthat/testRunTests.R#L69) *style:* **Commented code should be removed.**
```r
#   runTests(simple_all_tests_pass_project_path)
    ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/testRunTests.R:73:5:](https://github.com/RTMC/tmc-r/blob/cb4ae20402f066b36e80c67b920ab8db2a87c70a/tests/testthat/testRunTests.R#L73) *style:* **Commented code should be removed.**
```r
#   string1 <- format(.PrintResult("Testi1", "!", FALSE))
    ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/testRunTests.R:74:5:](https://github.com/RTMC/tmc-r/blob/cb4ae20402f066b36e80c67b920ab8db2a87c70a/tests/testthat/testRunTests.R#L74) *style:* **Commented code should be removed.**
```r
#   string2 <- format("Testi1: PASS")
    ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/testRunTests.R:75:5:](https://github.com/RTMC/tmc-r/blob/cb4ae20402f066b36e80c67b920ab8db2a87c70a/tests/testthat/testRunTests.R#L75) *style:* **Commented code should be removed.**
```r
#   expect_equal(string1, string2)
    ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/testTestthatResultReader.R:1:1:](https://github.com/RTMC/tmc-r/blob/cb4ae20402f066b36e80c67b920ab8db2a87c70a/tests/testthat/testTestthatResultReader.R#L1) *style:* **Trailing blank lines are superfluous.**
```r

^
```


haha good catch


case는 각줄에 있는게 좀더 읽기 편할것 같아요


Note to self. The database name is fixed (`travel-sample`) and a folder is created per the user's username.


These labels are actually used in newly created modal: 'MigrationFromReplicaOptions'. If I remove them from this patch, no labels will be displayed in the modal.


State에 값이 추가되었을 때 여긴 아무 오류없이 넘어 가니
default대신 `case .none:` 을 처리해주는게 좋을 것 같습니다.


А что значит \4) ?
Смысл такой, что если ковычка одинарная то внутри могут быть двойные сколько угодно, но одинарная это конец. Т.е. така регулярка последовательность " ' " распарсит некорректно и такую тоже ' " '.


this is a commit from github.com


이거 이렇게 공개해도 되나요? ㅋㅋ


시밤 ㅋㅋㅋㅋ


I understand the selection event API is changing, and it makes sense to have now `selected` and `deselected` props 👍  I think we should keep `target` exactly as it was in all `selection:xxxx` events though, at least for now and not without a deprecation period.

Then maybe we could add a new `selection` prop that contains either the `ActiveSelection` object or `null`, making the API more predictable? I don't know.

If I find the time in the upcoming days I'll try to open a PR with tests asserting `target` prop, but I'm still wrapping my head around Fabric codebase at the moment (working with @blobinabottle) so I'll see if I feel confortable to do it myself.


Why do we wait until `equals(...)` is invoked to initialize `exceptToClause` instead of during object construction?


변수 둘다 안 받을거면
```swift
case let .repoIssues:
```


Line 109 you set DELTA to a new value, but then that value will be used as work path. HOME is obviously not intended as user's home


This line is missing the `pattern` object which re-introduces issue #1


Refs #1


shuffles*


Can we discuss how to implement this?


[R/Authentication.R:1:3:](https://github.com/RTMC/tmc-r/blob/335e748f15b0803cf54af538b2bcf6c21dc57c77/R/Authentication.R#L1) *style:* **Commented code should be removed.**
```r
# install.packages("rjson")
  ^~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/Authentication.R:2:3:](https://github.com/RTMC/tmc-r/blob/335e748f15b0803cf54af538b2bcf6c21dc57c77/R/Authentication.R#L2) *style:* **Commented code should be removed.**
```r
# install.packages("httr")
  ^~~~~~~~~~~~~~~~~~~~~~~~
```
[R/Authentication.R:5:1:](https://github.com/RTMC/tmc-r/blob/335e748f15b0803cf54af538b2bcf6c21dc57c77/R/Authentication.R#L5) *style:* **Lines should not be more than 80 characters.**
```r
# https://developer.salesforce.com/docs/atlas.en-us.api_rest.meta/api_rest/intro_understanding_username_password_oauth_flow.htm
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/Authentication.R:7:1:](https://github.com/RTMC/tmc-r/blob/335e748f15b0803cf54af538b2bcf6c21dc57c77/R/Authentication.R#L7) *style:* **Lines should not be more than 80 characters.**
```r
  client_id <- "d56662a9898966d8275edb2e609bf1c52919ca7a4e3797bd663e40833522ab3b"
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/Authentication.R:9:1:](https://github.com/RTMC/tmc-r/blob/335e748f15b0803cf54af538b2bcf6c21dc57c77/R/Authentication.R#L9) *style:* **Lines should not be more than 80 characters.**
```r
  body <- paste(sep = "", "grant_type=password&client_id=", client_id, "&client_secret=", secret,"&username=",
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/Authentication.R:9:98:](https://github.com/RTMC/tmc-r/blob/335e748f15b0803cf54af538b2bcf6c21dc57c77/R/Authentication.R#L9) *style:* **Commas should always have a space after.**
```r
  body <- paste(sep = "", "grant_type=password&client_id=", client_id, "&client_secret=", secret,"&username=",
                                                                                ^
```
[R/Authentication.R:12:10:](https://github.com/RTMC/tmc-r/blob/335e748f15b0803cf54af538b2bcf6c21dc57c77/R/Authentication.R#L12) *warning:* **no visible global function definition for ‘POST’**
```r
  req <- POST(url = "https://tmc.mooc.fi/oauth/token", body = body)
         ^~~~
```
[R/Authentication.R:14:5:](https://github.com/RTMC/tmc-r/blob/335e748f15b0803cf54af538b2bcf6c21dc57c77/R/Authentication.R#L14) *style:* **Place a space before left parenthesis, except in a function call.**
```r
  if(status_code(req)==200){
    ^
```
[R/Authentication.R:14:22:](https://github.com/RTMC/tmc-r/blob/335e748f15b0803cf54af538b2bcf6c21dc57c77/R/Authentication.R#L14) *style:* **Put spaces around all infix operators.**
```r
  if(status_code(req)==200){
                    ~^~~
```
[R/Authentication.R:16:5:](https://github.com/RTMC/tmc-r/blob/335e748f15b0803cf54af538b2bcf6c21dc57c77/R/Authentication.R#L16) *warning:* **no visible global function definition for ‘stop_for_status’**
```r
    stop_for_status(x = req, task = "Authenticate with TMC")
    ^~~~~~~~~~~~~~~
```
[R/Authentication.R:17:30:](https://github.com/RTMC/tmc-r/blob/335e748f15b0803cf54af538b2bcf6c21dc57c77/R/Authentication.R#L17) *warning:* **no visible global function definition for ‘content’, Did you mean 'confint'?**
```r
    token <- paste("Bearer", content(req)$access_token)
                             ^~~~~~~
```
[R/Authentication.R:21:12:](https://github.com/RTMC/tmc-r/blob/335e748f15b0803cf54af538b2bcf6c21dc57c77/R/Authentication.R#L21) *style:* **Remove spaces before the left parenthesis in a function call.**
```r
    return (content(req))
           ^
```
[R/Authentication.R:21:13:](https://github.com/RTMC/tmc-r/blob/335e748f15b0803cf54af538b2bcf6c21dc57c77/R/Authentication.R#L21) *warning:* **no visible global function definition for ‘content’, Did you mean 'confint'?**
```r
    return (content(req))
            ^~~~~~~
```
[R/Authentication.R:29:1:](https://github.com/RTMC/tmc-r/blob/335e748f15b0803cf54af538b2bcf6c21dc57c77/R/Authentication.R#L29) *style:* **Lines should not be more than 80 characters.**
```r
# Temporary testing/example function that fetches the data of a single course from TMC
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/Authentication.R:30:1:](https://github.com/RTMC/tmc-r/blob/335e748f15b0803cf54af538b2bcf6c21dc57c77/R/Authentication.R#L30) *style:* **Variable or function name should be snake_case.**
```r
tempGetCourse <- function(token) {
^~~~~~~~~~~~~
```
[R/Authentication.R:33:10:](https://github.com/RTMC/tmc-r/blob/335e748f15b0803cf54af538b2bcf6c21dc57c77/R/Authentication.R#L33) *warning:* **no visible global function definition for ‘GET’, Did you mean 'T'?**
```r
  req <- GET(url = url, config = add_headers(Authorization = token))
         ^~~
```
[R/Authentication.R:33:34:](https://github.com/RTMC/tmc-r/blob/335e748f15b0803cf54af538b2bcf6c21dc57c77/R/Authentication.R#L33) *warning:* **no visible global function definition for ‘add_headers’**
```r
  req <- GET(url = url, config = add_headers(Authorization = token))
                                 ^~~~~~~~~~~
```
[R/Authentication.R:34:3:](https://github.com/RTMC/tmc-r/blob/335e748f15b0803cf54af538b2bcf6c21dc57c77/R/Authentication.R#L34) *warning:* **no visible global function definition for ‘stop_for_status’**
```r
  stop_for_status(x = req, task = "Fetching data from the TMC API")
  ^~~~~~~~~~~~~~~
```
[R/Authentication.R:35:13:](https://github.com/RTMC/tmc-r/blob/335e748f15b0803cf54af538b2bcf6c21dc57c77/R/Authentication.R#L35) *warning:* **no visible global function definition for ‘content’, Did you mean 'confint'?**
```r
  course <- content(req)
            ^~~~~~~
```
[R/Authentication.R:41:1:](https://github.com/RTMC/tmc-r/blob/335e748f15b0803cf54af538b2bcf6c21dc57c77/R/Authentication.R#L41) *style:* **Variable or function name should be snake_case.**
```r
tempGetAllCourses <- function(token, org_id) {
^~~~~~~~~~~~~~~~~
```
[R/Authentication.R:42:1:](https://github.com/RTMC/tmc-r/blob/335e748f15b0803cf54af538b2bcf6c21dc57c77/R/Authentication.R#L42) *style:* **Lines should not be more than 80 characters.**
```r
  url <- paste("https://tmc.mooc.fi/api/v8/core/org/", org_id, "/courses", sep = "")
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/Authentication.R:43:5:](https://github.com/RTMC/tmc-r/blob/335e748f15b0803cf54af538b2bcf6c21dc57c77/R/Authentication.R#L43) *style:* **Commented code should be removed.**
```r
  # url <- "https://tmc.mooc.fi/api/v8/core/org/hy/courses"
    ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/Authentication.R:46:10:](https://github.com/RTMC/tmc-r/blob/335e748f15b0803cf54af538b2bcf6c21dc57c77/R/Authentication.R#L46) *warning:* **no visible global function definition for ‘GET’, Did you mean 'T'?**
```r
  req <- GET(url = url, config = add_headers(Authorization = token))
         ^~~
```
[R/Authentication.R:46:34:](https://github.com/RTMC/tmc-r/blob/335e748f15b0803cf54af538b2bcf6c21dc57c77/R/Authentication.R#L46) *warning:* **no visible global function definition for ‘add_headers’**
```r
  req <- GET(url = url, config = add_headers(Authorization = token))
                                 ^~~~~~~~~~~
```
[R/Authentication.R:47:3:](https://github.com/RTMC/tmc-r/blob/335e748f15b0803cf54af538b2bcf6c21dc57c77/R/Authentication.R#L47) *warning:* **no visible global function definition for ‘stop_for_status’**
```r
  stop_for_status(x = req, task = "Fetching data from the TMC API")
  ^~~~~~~~~~~~~~~
```
[R/Authentication.R:48:14:](https://github.com/RTMC/tmc-r/blob/335e748f15b0803cf54af538b2bcf6c21dc57c77/R/Authentication.R#L48) *warning:* **no visible global function definition for ‘content’, Did you mean 'confint'?**
```r
  courses <- content(req)
             ^~~~~~~
```
[R/Authentication.R:54:1:](https://github.com/RTMC/tmc-r/blob/335e748f15b0803cf54af538b2bcf6c21dc57c77/R/Authentication.R#L54) *style:* **Trailing blank lines are superfluous.**
```r

^
```
[R/Example.R:1:1:](https://github.com/RTMC/tmc-r/blob/335e748f15b0803cf54af538b2bcf6c21dc57c77/R/Example.R#L1) *style:* **Variable or function name should be snake_case.**
```r
returnsTrue <- function() {
^~~~~~~~~~~
```
[R/TMC_plugin.R:7:1:](https://github.com/RTMC/tmc-r/blob/335e748f15b0803cf54af538b2bcf6c21dc57c77/R/TMC_plugin.R#L7) *style:* **Variable or function name should be snake_case.**
```r
loginGadget <- function() {
^~~~~~~~~~~
```
[R/TMC_plugin.R:70:16:](https://github.com/RTMC/tmc-r/blob/335e748f15b0803cf54af538b2bcf6c21dc57c77/R/TMC_plugin.R#L70) *style:* **Use <-, not =, for assignment.**
```r
      response = authenticate(input$username,input$password)
               ^
```
[R/TMC_plugin.R:70:18:](https://github.com/RTMC/tmc-r/blob/335e748f15b0803cf54af538b2bcf6c21dc57c77/R/TMC_plugin.R#L70) *warning:* **no visible global function definition for ‘authenticate’**
```r
      response = authenticate(input$username,input$password)
                 ^~~~~~~~~~~~
```
[R/TMC_plugin.R:70:46:](https://github.com/RTMC/tmc-r/blob/335e748f15b0803cf54af538b2bcf6c21dc57c77/R/TMC_plugin.R#L70) *style:* **Commas should always have a space after.**
```r
      response = authenticate(input$username,input$password)
                                             ^
```
[R/TMC_plugin.R:72:17:](https://github.com/RTMC/tmc-r/blob/335e748f15b0803cf54af538b2bcf6c21dc57c77/R/TMC_plugin.R#L72) *style:* **Only use double-quotes.**
```r
      if (grepl('Bearer',response[1])) {
                ^~~~~~~~
```
[R/TMC_plugin.R:72:26:](https://github.com/RTMC/tmc-r/blob/335e748f15b0803cf54af538b2bcf6c21dc57c77/R/TMC_plugin.R#L72) *style:* **Commas should always have a space after.**
```r
      if (grepl('Bearer',response[1])) {
                         ^
```
[R/TMC_plugin.R:81:7:](https://github.com/RTMC/tmc-r/blob/335e748f15b0803cf54af538b2bcf6c21dc57c77/R/TMC_plugin.R#L81) *warning:* **no visible global function definition for ‘showDialog’**
```r
      showDialog(title = title, message = message, url = "")
      ^~~~~~~~~~
```
[R/TMC_plugin.R:84:1:](https://github.com/RTMC/tmc-r/blob/335e748f15b0803cf54af538b2bcf6c21dc57c77/R/TMC_plugin.R#L84) *style:* **Lines should not be more than 80 characters.**
```r
    # render*-function renders UI content and corresponds to *Output-function in UI
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/TMC_plugin.R:87:12:](https://github.com/RTMC/tmc-r/blob/335e748f15b0803cf54af538b2bcf6c21dc57c77/R/TMC_plugin.R#L87) *style:* **Variable or function name should be snake_case.**
```r
    output$courseDisplay <- renderText({
           ^~~~~~~~~~~~~
```
[R/TMC_plugin.R:91:3:](https://github.com/RTMC/tmc-r/blob/335e748f15b0803cf54af538b2bcf6c21dc57c77/R/TMC_plugin.R#L91) *warning:* **no visible global function definition for ‘runGadget’**
```r
  runGadget(ui, server, viewer = dialogViewer("TMC login"))
  ^~~~~~~~~
```
[R/TMC_plugin.R:91:34:](https://github.com/RTMC/tmc-r/blob/335e748f15b0803cf54af538b2bcf6c21dc57c77/R/TMC_plugin.R#L91) *warning:* **no visible global function definition for ‘dialogViewer’**
```r
  runGadget(ui, server, viewer = dialogViewer("TMC login"))
                                 ^~~~~~~~~~~~
```
[tests/testthat/testAuthentication.R:7:1:](https://github.com/RTMC/tmc-r/blob/335e748f15b0803cf54af538b2bcf6c21dc57c77/tests/testthat/testAuthentication.R#L7) *style:* **Lines should not be more than 80 characters.**
```r
  expect_is(authenticate("sddsdaddsdsdadasads", "dsdasasdsdsdasdasdasd"), "list")
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```


I recommend you to run `gradle testJavadoc` and examine the resulting documentation.